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EINLEITUNG 


Rund um den C16 und Plus/4 


R edakteure kennen einen wichti¬ 
gen Leitsatz: »Information ist eine 
Holschuld!« Das heißt nichts wei¬ 
ter, als daß Neuigkeiten, Informationen 
über bestimmte Produkte, Trends und 
Wissen nur selten auf einen selbst 
zugeflogen kommen, sondern von 
irgendjemand besorgt werden müssen. 

Das gilt natürlich nicht nur für Redak¬ 
teure, sondern auch für unsere Leser. 

Nur haben Sie einen entscheidenden 
Vorteil: Die Information, die Sie suchen 
oder brauchen, finden Sie als kompakte 
Einheit in den 64’er-Sonderheften. Und 
was Sie suchen, erfahren wir in der Regel wieder von Ihnen, 
als Ergebnis von Umfragen, Briefen, den in jedem Heft ent¬ 
haltenen Mitmachkarten oder last not least der 64'er-Hotline, 
die jeden Tag unzählige Anrufe entgegennimmt. Die meisten 
64’er-Sonderhefte haben ein bestimmtes Thema als Schwer¬ 
punkt. Das ist sinnvoll in Anbetracht der riesigen Informa- 
tionsfüile, die es zum C64 gibt. C16- oder Plus/4-Besitzer 
haben dagegen einiges zum Nachholen. Deshalb versuchen 
wir, Ihnen eine interessante Mischung aus Grundlagen, be¬ 
währten und neuen Produkten sowie vielen neuen Listings 
zum Abtippen zu bieten. 

Immer wieder aktuell sind Drucker. Sie sind das beliebteste 
Peripheriegerät und stehen auf der Wunschliste vieler Com¬ 
puterbesitzer ganz oben. Als Verbindungsglied zur »Außen¬ 
welt« wird durch Drucker der Einsatz des Computers erst so 
richtig interessant. Ob es sich um das Schreiben von Briefen 
handelt, das Drucken von Grafiken oder die Ausgabe von 
Listen, Tabellen und Listings; der Drucker wird nach kurzer 
Zeit zum unentbehrlichen Bestandteil der eigenen Compu¬ 
teranlage gehören. Leider ist er oft wesentlich teurer als der 
Computer selbst. Deshalb ist eine objektive Beurteilung und 
eine ausführliche Kaufhilfe sehr wichtig, um Fehlentschei¬ 
dungen zu vermeiden. Wir stellen Ihnen die besten und preis¬ 
wertesten Drucker vor. 

Vielleicht ist es noch nicht allen C16- oder Plus/4-Besitzern 
bekannt: über einen kleinen Adapter lassen sich alle Joy¬ 
sticks, die es für den C64 gibt, auch an diese Computer 
anschließen. Wir sagen Ihnen, welche es gibt und be¬ 
schreiben deren Stärken und Schwächen, denn auch hier 


kann eine zu schnelle oder falsche Ent¬ 
scheidung eine Menge Ärger bereiten 
und viel Geld kosten. 

Weniger um Geld als um Wissen geht es 
bei unseren Grundlagenthemen. Hier 
werden die echten Computerfreaks an¬ 
gesprochen, also diejenigen, die den 
C16 oder Plus/4 weniger als prak¬ 
tisches Arbeitsgerät sehen denn als 
Hobby, mit dem man sich intensiv aus¬ 
einandersetzt. Wissen bedeutet hier 
weniger Macht als mehr die Erfolgser¬ 
lebnisse beim Lösen von Problemen. 
Und Probleme gibt es genug zu lösen. 
Doch oft sind es nicht nur Schwierigkeiten, die beseitigt wer¬ 
den sollen, sondern manchen gehen schier die Augen auf, 
wenn sie erst die enormen Möglichkeiten erkennen, die der 
Computer bietet. Sei es der sinnvolle und effektive Einsatz 
der Floppy oder die professionelle Programmierung von 
Grafik, wollen Sie selbst Datei-Programme schreiben oder 
alles über das Sortieren wissen, in diesem Sonderheft wird 
alles ausführlich behandelt. Sollten Sie schon zu den »Bit- 
Beißern« gehören, die in Maschinensprache programmieren, 
finden Sie viele neue Informationen über den Universal-Chip 
TED und hilfreiche Anleitungen zur Benutzung der Kernel- 
Routinen in eigenen Programmen. 

Wer das Sonderheft schon durchgeblättert hat, ist garantiert 
über unser Super-Grafik-Listing, den PED, gestolpert. Ein 
tolles Programm für den C16 mit 64 KByte Speicher¬ 
erweiterung oder den Plus/4. Erstellen von maßstabs¬ 
getreuen Zeichnungen, Konstruieren zwei- oder dreidimen¬ 
sionaler Gebilde sind die Schlagworte. Jeder, der Freude an 
Grafik hat, wird begeistert sein. Das gleiche gilt für die Apfel¬ 
männchen, die grafische Umsetzung einer interessanten 
Mathematik, die immer beliebter werden und ein riesiges 
Interesse hervorgerufen haben. Natürlich fehlen in diesem 
C16-, Plus/4-Sonderheft auch keine Spiele-Listings zum Ab¬ 
tippen. Nach der Lektüre der Grundlagenartikel eine will¬ 
kommene Ablenkung. Wir hoffen, daß Ihnen dieses Sonder¬ 
heft gefallen hat. Wenn nicht, dann schreiben Sie es uns, 
wenn ja, dann ist ein Brief oder eine Karte ebenso will¬ 
kommen. 
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Drucker - Der Schlü 


Drucker zählen von Anfang an zu den attraktiv¬ 
sten Peripheriegeräten, die für Computer zur Ver¬ 
fügung stehen. Wir stellen Ihnen die Drucker der 
unteren Preisklasse vor und zeigen Ihnen, wie 
diese Geräte arbeiten. 

D as erste Problem, mit dem derjenige, der einen Drucker 
anschließen will, konfrontiert wird, ist die verwendete 
Schnittstelle. Die angebotenen Druckerarbeiten prinzi¬ 
piell mit zwei Arten von Schnittstellen. Zum einen werden 
Drucker mit seriellen und zum anderen mit Centronics- 
Schnittstellen angeboten. Bei der seriellen Schnittstellte wird 
im wesentlichen zwischen der RS232-Schnittstelle und dem 
seriellen lEC-Bus unterschieden. Drucker mit RS232- 
Schnittstelle sind für Commodore-Computer kaum geeignet 
und sollen deshalb hier nicht weiter erwähnt werden. Der 
serielle lEC-Bus ist typisch für die Commodore- 
Heimcomputer. Da diese Computer eine solche Schnittstelle 
als Standardausrüstung eingebaut haben, gibt es beim 
Anschluß serieller (IEC-) Drucker keinerlei Probleme, da 
diese einfach durch ein mitgeliefertes Kabel mit dem Compu¬ 
ter verbunden werden. Etwas schwieriger wird es, wenn ein 
Drucker mit Centronics-Schnittstelle angeschlossen werden 
soll. Im Unterschied zur seriellen Schnittstelle, bei der die 
Daten bitweise übertragen werden, ist eine Centronics- 
Schnittstelle in der Lage, 8 Bit auf einmal, also parallel, zu ver¬ 
arbeiten. Man benötigt deshalb eine Umwandlung, mit der 
der Datenfluß von seriell nach parallel geändert wird, um 
einen Computer mit Centronics-Schnittstelle an den C16 
oder Plus/4 anzuschließen. Solche Umwandler werden auch 
Interface genannt. Ein solches Interface besitzt zwei ver¬ 
schiedene Anschlüsse. Davon kann einer direkt an den Com¬ 
puter angeschlossen werden, der andere ist für den 
Centronics-Drucker gedacht. Dazwischen werden die Daten 
von einer speziellen Elektronik für den Drucker aufbereitet. 

Interfaces für jeden Bedarf 


Weit verbreitet ist das Wiesemann-Interface, dessen 
Anschluß an den C16 jedoch einige Probleme bereitet. Da 
das Gerät einen eigenen Prozessor besitzt, holt es sich beim 
C64 die benötigten 5 V vom Kassetten-Port. Dieser ist beim 
C16 und beim Plus/4 allerdings mit einer anderen Anschluß¬ 
buchse versehen, so daß das zum Interface mitgelieferte 
Kabel nicht zu der verwendeten Buchse paßt. Also muß der 
Strom an anderer Stelle besorgt werden. Entweder man holt 
sich die Spannung doch vom Kassetten-Port, und zwar von 
Kontakt 2 der Anschlußbuchse oder man verwendet ein 
regelbares Netzteil. In jedem Fall muß Pin 18 des Interface¬ 
internen Prozessors mit 5 V versorgt werden. Dann ist auch 
dieses Problem gelöst. 

Ein weiteres Interface, das zum eben besprochenen erwei¬ 
terte Funktionen aufweist, wird von HDS angeboten. Auch 
hier gibt es wieder das Problem mit der Stromversorgung. 
Diesmal muß am Drucker selbst ein Kabel eingelötet werden, 
da die Spannung vom Drucker abgenommen wird. Da dies 
von Drucker zu Drucker verschieden ist, muß dieser kleine 
Umbau vom Händler vorgenommen werden. Dafür weist das 
Produkt andere Vorteile auf. Das Interface kann sogar pro¬ 
grammiert werden und paßt sich damit optimal den individuel¬ 
len Bedingungen an. 


Nachdem Sie nun über die grundsätzlichen Anschlußmetho¬ 
den informiert sind, sehen wir uns nun die gebräuchlichsten 
Drucker mit den verwendeten Techniken näher an. Durchge¬ 
setzt haben sich für den gesamten Heimcomputer-Bereich 
die Matrixdrucker. Diese Drucker verwenden eine denkbar 
einfache Technik, um die Zeichen zu Papier zu bringen. Ein 
Buchstabe wird intern in eine Matrix umgewandelt, die zum 
Beispiel 8x8 Punkte enthält. Im Druckkopf selbst befinden 
sich nun in der Regel acht Nadeln. Diese können jeden ein¬ 
zelnen senkrechten Punkt der Zeichenmatrix durch Heraus¬ 
schießen aus dem Druckkopf auf das Papier drücken. Ist eine 
senkrechte Leiste der Matrix zu Blatt gebracht, fährt der 
Druckkopf ein kleines Stück weiter und beginnt mit der näch¬ 
sten Spalte und so fort, bis das Zeichen fertiggestellt ist. 
Sehen wir uns nun die für den C16 und den Plus/4 am besten 
geeigneten Matrixdrucker aus der Nähe an. An erster Stelle 
müssen hier natürlich die seit langem erhältlichen 
Commodore-Drucker genannt werden. Diese Druckerlassen 
sich auch ohne Probleme und Zusatzgeräte mit Hilfe des mit¬ 
gelieferten Kabels an den C16 oder Plus/4 anschließen. 
Allerdings läßt die Leistungsfähigkeit dieser Drucker im Ver¬ 
gleich mit anderen Geräten, die Sie im weiteren Verlauf ken¬ 
nenlernen, doch einiges zu wünschen übrig. Der größte 
Nachteil liegt in der Geschwindigkeit. Jeder, der einen dieser 
Drucker neben einem Epson gesehen hat, wird dies bestäti¬ 
gen. Dafür sind die MPS-Drucker von Commodore zu einem 
relativ günstigen Preis zu erhalten. Doch nun konkret zu den 
einzelnen Modellen. Der erste Drucker, den Commodore für 
seine H-' ncomputer auf den Markt brachte, war der MPS 
801 (Bild 1). Dieser Drucker ist in der Lage, nicht nur Briefe, 
Listings oder ähnliches zu drucken, sondern auch Grafiken. 
Das größte Manko, vor allem in Bezug auf die modernen Text¬ 
verarbeitungen, kommt sehr schnell beim ersten ausge¬ 
druckten Text zum Vorschein. Der Drucker ist, wie einige 
andere auch, nicht in der Lage, Umlaute zu verarbeiten. Statt 
dessen erscheinen nur Grafikzeichen auf dem Papier. Der 
MPS 801 ist also ein Drucker, der zwar mit 298 Mark relativ 
preisgünstig ist, dessen Leistungsmerkmale aber zu wün¬ 
schen übrig lassen. Der nächste aus dem Trio der älteren 
Commodore-Drucker ist der MPS 802. Dieser Drucker 
besitzt zwar gegenüber dem MPS 801 einige Verbesserun¬ 
gen, vor allem was die formatierte Ausgabe von Daten betrifft, 
doch war dieser in keiner Weise zum Ausdrucken von Grafi¬ 
ken fähig. Der MPS 802 wird in der Zwischenzeit nicht mehr 
angeboten und kann höchstens noch über den Gebraucht¬ 
markt bezogen werden. Beide Drucker, sowohl der MPS 801 
als auch der MPS 802, verwenden für den Papiereinzug die 
Traktortechnik, bei der spezielles Papier mit Lochrand über 



Bild 1. MPS 801 von Commodore 
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Stachelwalzen am Druckkopf vorbeigeführt wird. Eine etwas 
andere Technik verwendet hier der MPS 803 (Bild 2), das 
Nachfolgemodell zum MPS 801. Ansonsten absolut iden¬ 
tisch mit dem MPS 801, kann der entsprechende Traktor nur 
zu einem Aufpreis von 100 Mark zusätzlich angebaut wer¬ 
den. Ein letzter Unterschied zum MPS 801 ist das geänderte 
Gehäuse. Der Drucker kostet, wie auch der MPS 801, 
298 Mark. 

MPS 1000 - das neue Flaggschiff 


Endgültig Schluß mit den Nachteilen der MPS-Modelle macht 
der neue Drucker aus dieser Serie, der MPS 1000 (Bild 3). 
Wie auch die anderen MPS-Modelle wird auch der neue MPS 
1000 nicht von Commodore selbst hergestellt, sondern von 
Epson. Allerdings weist der Drucker nicht nur die vielleicht 
bekannten Epson-Eigenschaften auf, sondern bietet dane¬ 
ben noch eine Reihe besonderer Leistungen. Um den MPS 
1000 nicht nur an den C 64 oder C128 anschließen zu kön¬ 
nen, sind sowohl die Centronics- als auch die serielle Schnitt¬ 
stelle eingebaut. Die DIP-Schalter sind gut erreichbar auf der 
Rückseite des Gerätes angebracht. Damit können verschie¬ 
dene Funktionen eingestellt werden. So wird beispielsweise 
zwischen IBM- und Commodore-Modus umgeschalten, oder 
verschiedene Zeichensatzanpassungen ausgewählt. Der 
Drucker verfügt über einen Zugtraktor für den Papiereinzug. 
Diese Technik zählt zwar nicht zu den besten, erfüllt aber die 
erwartete Leistung zufriedenstellend. 

Am wichtigsten für den Heimcomputer-Besitzer ist zweifel¬ 
los der für diese Computer zur Verfügung stehende Befehls¬ 
satz. Dieser ist eine interessante Mischung aus denen des 
MPS 801 und MPS 802. Der Vorteil ist, daß endlich ein ver¬ 
nünftiger Grafikmodus zur Verfügung steht. So gibt es die bis¬ 
her allgemein übliche Auflösung von 480 Punkten pro Zeile 
und auch eine Grafik mit doppelter Auflösung (960 Punkte 
pro Zeile). Alle Commodore-Zeichen können sogar in NLQ- 
Schrift ausgedruckt werden. Trotzdem sind Reversdruck, 
Breitschrift und Normalschrift auch weiterhin über Steuerbe¬ 
fehle anwählbar. Die vom MPS 802 her bekannten Förmatie- 
rungsanweisungen funktionieren auch beim MPS 1000 
tadellos. Durch die Abstimmung der Zeichensätze auf den 
Commodore-Computer können auch ohne weiteres Umlaute 



Bild 2. Der MPS 803 - ein kompakter Drucker 


gedruckt werden. Allerdings sind die Umlaute mit den Textve¬ 
rarbeitungsprogrammen, die es auch für den C16 und Plus/4 
gibt, nicht zu erreichen. 

Für die Grafik ist beim MPS 1000, neben dem CBM-Modus 
(480,960 Punkte) auch der IBM-Modus zuständig. In diesen 
Modus gelangt man durch das Umstellen eines DIP- 
Schalters. Zusätzlich stehen noch zwei Befehle zur Verfü¬ 
gung, die Grafikdichten von 480 bis 1920 Punkte pro Zeile 
erlauben. Die Qualität der NLQ-Schrift fällt ebenfalls sehr 
zufriedenstellend aus. 

Für 798 Mark erhält man somit einen Drucker, der sich vor 
allem durch die starken Verbesserungen gegenüber den Vor¬ 
gängermodellen auszeichnet. Wenn man von dem etwas 
nachteiligen Zugtraktor einmal absieht, erhält man damit 
durchaus ein Gerät, das auch beim Umsteigen auf einen grö¬ 
ßeren Computer keine Schwierigkeiten bereitet. 

Eindeutige Referenzen 


Um sich als Referenzdrucker profilieren zu können, mußte 
der Star NL-10 (Bild 4) schon einiges zu bieten haben. Wie 
auch die Commodore-Drucker arbeitet der NL-10 mit der 
Matrix-Technik. Die größte Besonderheit liegt in der verwen¬ 
deten Schnittstelle. Diese wird als Modul mitgeliefert. Wobei 
man auswählen kann zwischen einer Centronics und einer 
seriellen Schnittstelle. Das Papier wird über zwei versenkte 
Stachelwalzen eingezogen. Diese lassen sich auf der ganzen 
Breiip des Druckers verschieben, wodurch auch das 
Bedrucken von schmaleren Papierarten, wie etwa Etiketten, 
keine Probleme mit sich bringt. Ein unter dem Gehäuse ange¬ 
brachter Multifunktionshebel sorgt für die richtige Einstellung 
der Papierart. Der Star NL-10 kann sowohl Einzelblatt als auch 
Endlospapier verarbeiten. Daneben zählen noch eine mes¬ 
serscharfe Papierabrißkante und eine Justierhilfe für andere 
Formulare zu den nützlichen Bestandteilen dieses Druckers. 
Die DIL-Schalter sind sehr gut zugänglich an der Gehäuse¬ 
rückseite angebracht. Programmieren läßt sich der Star 
NL-10 wie ein Drucker der gehobenen Preisklasse. Auf der 
vorderen Gehäuseoberseite besitzt er fünf verschiedene 
Schalter und sieben Leuchtdioden. Mit den Schaltern lassen 
sich neben den üblichen Funktionen wie Online, Zeilen- und 
Seitenvorschub die gewünschten Schriftgrößen bis hin zur 
ausgezeichnet dargestellten NLQ-Schrift verwirklichen. Die 
fünfte Taste dient der Wahl der Fettschrift in Kombination mit 
der jeweils eingestellten Schriftgröße. Im Offline-Modus kann 
man per Tastendruck sogar den linken und rechten Rand fest- 



Bild 3. MPS 1000 - jüngstes Kind von Commodore 
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Bild 4. Der Star NL-10 - ein echter Star 


legen. Dabei wird der Druckkopf so lange von links oder 
rechts in Mikroschritten bewegt, bis die gewünschte Position 
erreicht ist. Eine genaue Justierung auf verschiedene For¬ 
mate und Formulare ist so ohne Schwierigkeiten und Finger¬ 
akrobatik möglich. Alle Funktionen lassen sich auch mit CHR$ 
und ESC-Sequenzen darstellen. Der eigentliche Befehlssatz 
wird im wesentlichen durch das verwendete Schnittsteilen- 
Modul beeinflußt. Beim Kauf hat man die Auswahl zwischen 
einem Centronics-, einem IBM- und erfreulicherweise auch 
einem Commodore-Modul für den C64/ CI28. Natürlich 
kann hier auch ein C16 oder ein Plus/4 angeschlossen wer¬ 
den. Im Preis des Star NL-10 ist ein Modul nach Wahl einge¬ 
schlossen. Der große Vorteil dieser Modultechnik liegt in der 
mehrfachen Verwendbarkeit des Druckers. Steigt der 
Anwender auf einen neuen Computer um, muß er dashalb 
keinen neuen Drucker anschaffen, sondern lediglich ein 
neues Schnittstellen-Modul (je 150 Mark). Natürlich stehen 
auch bei Verwendung des Commodore-Moduls die gesam¬ 
ten Fähigkeiten des NL-10 zur Verfügung. 

Trotz der Implementierung aller Befehle des MPS 803, ein¬ 
schließlich der Grafikbefehle, bleiben die Funktionen bei¬ 
spielsweise eines Epson LX-80 erhalten. Diesen Drucker 
werden Sie weiter unten noch kennenlernen. Gleiches gilt für 
den Zeichensatz, hier hat man den original Commodore- 
Zeichensatz oder den ASCII-Zeichensatz zur Auswahl. Einer 
der DIL-Schalter ermöglicht es sogar, den Commodore- 
Zeichensatz an Stelle einiger Grafikzeichen um die deut¬ 
schen Sonderzeichen und Umlaute zu bereichern. Wir haben 
das mit verschiedenen Textverarbeitungs- und Grafikpro¬ 
grammen getestet. Alles funktionierte auf Anhieb, ohne daß 
auch nur ein einziges Kommando an den Drucker geschickt 
werden mußte! In der Regel benötigen Sie also das übrigens 
sehr gute Handbuch nicht. Bei den getesteten Programmen 
verwendet der NL-10 die 7-Nadel-Grafik des MPS 803. So 
richtig zum Zug kommt er aber erst, wenn man seine 
LX-80-Fähigkeiten verwendet. Dann ist er in der Lage, Grafi¬ 
ken mit bis zu vierfacher Dichte zu drucken. Mit dieser Grafik 
funktionieren im übrigen auch alle Hardcopy-Routinen, die für 
Epson-Drucker geschrieben sind. Darüber hinaus verfügt 
der Star NL-10 noch über einen Hex-Dump-Modus, bei dem 
der ASCII-Wert eines vom Computer geschickten Zeichens 
als hexadezimale und dezimale Zahl gedruckt wird. 

Wer gerne eigene Zeichen erstellen möchte, hat dazu aus¬ 
reichend Gelegenheit, denn sowohl die Standard- als auch 
NLQ-Zeichen sind vor keiner Veränderung sicher. Seine 
exzellenten Schriftqualitäten prädestinieren den NL-10 zur 
Textausgabe. Trotzdem besitzt er auch Fähigkeiten, die das 



Bild 5. Epson LX-80. Die neue Generation 


Herz jedes Programmierers höher schlagen lassen. Der 
NL-10 druckt jedes Commodore-Zeichen korrekt, so wie es 
auch auf dem Bildschirm zu sehen ist. Mit den Cursor- und 
Farbsteuerzeichen macht er aber etwas ganz Besonderes. 
Ein Listing, mit dem NL-10 erzeugt, sieht automatisch ähnlich 
aus wie unsere Checksummer-Listings, denn alle wenig aus¬ 
sagekräftigen Steuerzeichen werden in Klarschrift übersetzt. 
Die manchmal nervtötende Suche in verschiedenen Ver¬ 
gleichstabellen findet mit dem NL-10 endgültig ein Ende. 

Der Star NL-10 ist ein Gerät, das in jeder Hinsicht überzeu¬ 
gen kann. Zwar sind die Kosten für den Drucker (1145 Mark) 
im Verhältnis zum Kaufpreis eines C16 oder Plus/4 relativ 
hoch, doch warum sollte man deswegen auf Komfort verzich¬ 
ten? Der ‘-'ar NL-10 wird Sie auf keinen Fall enttäuschen. 

Epson - eine Firma setzt Standards 


Wer auf Nummer Sicher gehen will, der war und ist mit den 
Qualitätsdruckern aus dem Hause Epson bestens bedient. 
Vor allem mit der Kommandosprache, die die Epson-Drucker 
verstehen, hat die Firma einen Standard gesetzt, der von 
immer mehr Druckerherstellern übernommen wird. Unter 
anderem auch von unserem Referenzdrucker, dem oben 
angesprochenen Star NL-10. So wichtig beispielsweise bei 
Personalcomputern die Kompatibilität zu den IBM- 
Computern ist, so wichtig ist für die Druckerbranche die Ein¬ 
haltung des von Epson gesetzten Standards. Fast alle Epson- 
Drucker sind serienmäßig mit einer Centronics-Schnittstelle 
versehen, was also bei den meisten Epson-Druckern ein 
Interface notwendig macht. So beim LX-80 (Bild 5). Dieser 
Drucker arbeitet, wie alle bisher besprochenen Geräte, mit 
der Matrixtechnik und gefällt nicht nur durch sein formschö¬ 
nes Design. Er verfügt über den von Epson eingeführten 
ESC/P-Standard und ist dadurch in weiten Teilen kompatibel 
zum FX-85, einem der Flaggschiffe der Firma Epson. Da 
auch der IBM-Zeichensatz eingebaut ist, stehen durch 
Umschalten mittels eines ESC-Kommandos eine große Zahl 
zusätzlicher Grafikzeichen zurVerfügung.'Wermit Endlospa¬ 
pier arbeitet, muß allerdings für einen Aufpreis in einen ab¬ 
setzbaren Zugtraktor investieren. Abgesehen vom Traktor 
erhält man für 1098 Mark einen leistungsfähigen Drucker, mit 
dem sich sowohl in der Textverarbeitung als auch in den 
Bereichen Grafik und Statistik vernünftige Ergebnisse erzie¬ 
len lassen. 

Vor noch nicht allzulanger Zeit kannte man die Firma Citizen 
hauptsächlich als Uhrenhersteller. Es war schon eine kleine 
Sensation, als diese Firma im September 1985 ihre ersten 
Druckermodelle präsentierte, die aber vom Preis her mehrfür 
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Bild 6. Der Riteman C + , unkonventionell, aber gut 

Personal Computer gedacht waren. Wenige Wochen später 
folgte dann ein Produkt, das auch den Heimcomputer-Markt 
erobern sollte: der Citizen 120 D. Für 998 Mark erhält man 
einen Drucker, der wegen der auch hier verwendeten 
Schnittstelienmodule ohne Probleme an den C16 oder 
Plus/4 anschließbar ist. Danach steht der 120 D mit einem 
IBM- und einem Epson-Modus rund um die Uhr zur Verfü¬ 
gung. Um auch Endlospapier verarbeiten zu können, muß ein 
mitgelieferter Traktor aufgesetzt werden. Danach steht ein 
vollwertiger Matrixdrucker mit allen Schikanen auf dem Tisch. 
Die DIP-Schalter sind von außen leicht zugänglich. Sollte es 
Probleme im Inneren des Gerätes geben, läßt sich der 
Gehäusedeckel abnehmen, ohne das Gerät mit einem 
Schraubenzieher zu traktieren. Wie auch der Star NL-10 ist 
der Citizen 120 D in der Lage, beim Einschalten einen Hex- 
Dump auszugeben. 

Mit einem kleinen Hebel, der sich seitlich rechts am 
Gehäuse befindet, kann für mehrere Durchschläge die 
Anschlagstärke der Nadeln reguliert werden. 

In Sachen Befehlsumfang orientiert sich auch der 120 D am 
allgemein gültigen ESC/P-Standard von Epson, und hier spe¬ 
ziell des FX-85. 

Der Citizen 120 D ist durch sein ausgezeichnetes Preis-/ 
Leistungsverhältnis ein rundum empfehlenswertes Gerät, 
das durch die Kompatibilität zum Epson FX-85 sehr gute 
Arbeitsbedingungen schafft. 

Riteman C + 

- der etwas andere Drucker 


Neue Normen auf dem Druckermarkt setzte der Riteman C + 
(Bild 6) als er Mitte 1985 auf den Markt kam. Als erstes fällt 
an dem Gerät die eigenwillige und bis dahin unbekannte 
Papier- und Druckkopfführung auf. Der Drucker steht auf 
zwei Metallbügeln, so daß unter dem Gehäuse noch genü¬ 
gend Platz für das verwendete Endlospapier bleibt. Ein Trak¬ 
torband befördert das Papier unter dem Druckkopf durch und 
schiebt es nach hinten aus dem Drucker. Dieses Konzept 
schafft, zusammen mit dem ohnehin recht kompakten 
Drucker, tatsächlich Platz auf dem Computertisch. Nach dem 
Anstecken am seriellen lEC-Bus kann es sofort losgehen. 
Wer den Riteman C + zusammen mit einer Textverarbeitung 
verwendet, wird angenehm überrascht sein, da er über meh¬ 
rere Modi verfügt. Im wesentlichen sind das ein Normal- 


Bild 7. Paßt gut zum C16 und Plus/4 - der CPA 80X 

(Commodore) und ein Plus-(Epson)Modus. Die Auswahl 
kann über zwei der acht DIP-Schalter erfolgen oder über die 
Software gesteuert werden. Leider stehen im Normal-Modus 
keinerlei Umlaute zur Verfügung, da hier versucht wurde, die 
Fähigkeiten der Commodore-Drucker voll zu emulieren. 
Dafür weist der Plus-Modus die Befehle eines etwas abge¬ 
speckten Epson FX-80 auf. Außerdem ist dieser Modus mit 
zwei Grafikbefehlen ausgestattet, die es ermöglichen, auch 
für Epson-Drucker geschriebene Hardcopy-Programme zu 
verwenden. Als großer Vorteil erweist sich ein Befehl, mit 
dem sich zwischen den beiden Modi umschalten läßt. 
Dadurch sind enorme Effekte erzielbar. Einerseits können in 
einem Text die Commodore-Grafikzeichen, wie auch die 
Umlaute des Plus-Modus genutzt werden. Da in beiden Modi 
alle chen mit vollen Unterlängen gedruckt werden, fällt die 
Umschaltung kaum auf. 

Für 998 Mark erhält man einen Drucker, der nicht nur durch 
die platzsparende Papierverarbeitung, sondern auch durch 
die beiden sinnvoll kombinierbaren Modi für jeden Anwender 
etwas zu bieten hat. 

CRA-80X - der Vielseitige 

Der CPA-80X der Firma Melchers (Bild 7) ist erfreulicher¬ 
weise serienmäßig mit einer seriellen Schnittstelle ausge¬ 
stattet. So kann der Drucker ohne weiteres über die bekann¬ 
ten Commodore-Kabel an den C16 oder Plus/4 angeschlos¬ 
sen werden. Um auch ansonsten die Grundsätze der Kompa¬ 
tibilität zu wahren, sind die Fähigkeiten der drei 
Commodore-Drucker (MPS 801, MPS 802, MPS 803) voll 
implementiert. Programme, die für diese Drucker geschrie¬ 
ben sind, können also mit dem CPA-80X ohne weiteres wei¬ 
terverwendet werden. Daneben versteht der Drucker noch 
die zahlreichen Befehle, die von Epson und anderen ASCII- 
Druckern verstanden werden. Damit ist es möglich, Routinen 
zum Ausdruck hochauflösender Grafiken zu verwenden, die 
für Epson-Drucker geschrieben sind. Bei der Auslieferung ist 
der Drucker bereits fertig an Commodore-Computer ange¬ 
paßt, so daß sofort gearbeitet werden kann. Ansonsten befin¬ 
den sich unter einer Abdeckung an der Druckeroberseite 
sehr gut zugängliche DIP-Schalter, die es dem Fortgeschrit¬ 
tenen ermöglichen, individuelle Einstellungen vorzunehmen. 

Der Drucker ist sowohl für den Einzelblatt- wie auch für 
Endlospapiereinzug vorbereitet. Der Einzugtraktor wird dazu 
mitgeliefert. Dabei handelt es sich um einen Schubtraktor, 
dessen Stacheln zum Papiertransport hinter der Walze ver¬ 
senkt sind. Diese Technik hat den Vorteil, daß, im Gegensatz 
zu den aufgesetzten Zugtraktoren, auch das erste einge¬ 
spannte Blatt bedruckt werden kann. 
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Die bereits angesprochenen DIP-Schalter machen den 
CPA-80X zu einem sehr vielseitigen Gerät. Mehrere Drucker¬ 
typen können mit speziellen Einstellungen simuliert werden 
(CP-80X, MPS 802, CBM 1526, MPS 801, MPS 803, 
Epson, Taxan, C.ltoh, Standard-ASCII). Der CPA-80X verhält 
sich dann genauso wie das über DIP-Schalter angewählte 
Vorbild. Über weitere Schalter können insgesamt 23 Zei¬ 
chensätze angewählt werden. Neben der Geräteadresse (4 
bis 7) können weitere Funktionen über die DIP-Schalter ein¬ 
gestellt oder verändert werden. Eine andere Möglichkeit zur 
Steuerung dieses Druckers besteht über die Software mittels 
Steuerbefehlen. Hier kann man die Commodore-Steuer- 
zeichen ebensogut einsetzen wie die Escape-Sequenzen, 
die von Epson-Druckern bekannt sind. Die Anzahl der Schrift¬ 
arten ist daher recht beeindruckend. Aus der Vielzahl der 
Eigenschaften greifen wir einige Fähigkeiten heraus: 
Horizontal- und Vertikaltabulatoren, variabler Zeilenabstand, 
Schrifttypen wie Pica, Elite, Klein-, Breit-, Fettschrift, Doppel¬ 
druck, Hoch- und Tiefstellen, Unterstreichen, Grafikmodus 
mit einfacher und doppelter Dichte. Leider läßt der CPA-80X 
die inzwischen schon fast selbstverständliche Schönschrift 
(NLQ) vermissen. Trotz eines relativ guten Schriftbildes ist er 
daher nicht gerade für gehobene Korrespondenz geeignet. 

Alles in allem erhält man für 898 Mark einen Drucker, der 
außer der NLQ-Schrift keine Wünsche offen läßt. Dazu 
kommt noch die eingebaute serielle Schnittstelle, mit der man 
immerhin gut 200 Mark für ein Interface sparen kann. 

Präsident 6313 C - Drucker des Volkes 


Wie aus einer anderen Welt erscheint der Präsident 6313 C 
(Bild 8) zunächst dem Anwender. In Wirklichkeit ist das Gerät 
ein Produkt aus der deutschen Volkswirtschaft jenseits des 
Eisernen Vorhangs. Wie man erkennen kann, ist bei der Ent¬ 
wicklung in Sachen Design ein etwas klobig anmutender 
Drucker entstanden. Das Chassis des Präsident ist aus zwei 
Millimeter starkem Stahlblech aufgebaut, unter dem alle 
anderen, ebenfalls sehr robust wirkenden Teile angebracht 
sind. Das Gehäuse läßt sich als Ganzes hochklappen, da es 
nur durch Scharniere befestigt ist. Dadurch sind alle Teile des 
Druckers, vor allem die DIP-Schalter, sehr leicht zugänglich. 
Die Farbbandkassette kann ohne Probleme eingelegt wer¬ 
den, sogar die Finger behalten ihre ursprüngliche Farbe. 

Der Präsident verarbeitet sowohl Endlos- als auch Rollen¬ 
papier und Einzelblätter, die allerdings nicht automatisch ein¬ 
gezogen werden. Letztere werden ähnlich einer Schreibma¬ 
schine von oben hinter der Gummiwalze eingeführt und dann 
ausgerichtet. Bei Endlos- und Rollenpapier wird der Einfüh¬ 
rungsschlitz an der Rückseite des Druckers benutzt. Sicher 



Bild 8. Einen sehr robusten Eindruck macht der Präsident 


ungewöhnlich ist die Anordnung der Stachelwalzen auf einer 
Achse mit der Gummiwalze. Gespannt ist man natürlich, wie 
sich der Drucker mit den westlichen Standards versteht. 36 
Mikroschalter auf der Vorderseite des geöffneten Gehäuses 
lassen die Erwartungen höherschlagen. Was man dazu im 
deutschen Handbuch findet ist erstaunlich: Der Präsident 
6313 C ist kompatibel zum Epson-Standard, zum IBM-PC, zu 
Commodore-Computern und soll auch zu Schneider- 
Modellen passen. Das Schnittstellenproblem ist durch das 
bereits des öfteren angesprochene Modulkonzept gelöst. 
Auch hier entfallen also die Kosten für ein eigenes Interface. 

Mit 96 Zeichen pro Sekunde gehört der Drucker zwar nicht 
zu den schnellsten, nadelt aber zuverlüsig seine Zeichen 
aufs Papier und schreckt auch vor Grafik nicht zurück. Im 
NLQ-Modus kommt der Präsident auf 23 Zeichen pro 
Sekunde. 

Der Präsident 6313 C ist ein gelungenes Beispiel für die oft 
in Frage gestellte östliche Leistungsfähigkeit, was die Ent¬ 
wicklung von Hochtechnologie anbelangt. Mit einem Preis 
von 598 Mark ist er einer der momentan preiswertesten 
Drucker, die NLQ-Schrift drucken können. Da der Präsident 
6313 C nicht gerade als ausgesprochene Schönheit gelten 
kann, kommt es bei ihm vielmehr auf seine elektronischen 
und mechanischen Fähigkeiten an - und die stimmen rund¬ 
um. 

Die Thermodrucker verwenden in Bezug auf die Technik 
eine vollkommen andere Philosophie als die Matrixdrucker. 
Diese anschlagsfreien Geräte verwenden wärmeempfindli¬ 
ches Spezialpapier, das beispielsweise mit einer Wachs¬ 
schicht überzogen sein kann. Der Druckkopf besteht aus 
einer Matrix von Widerständen, die heute üblicherweise auf 
einem Siliziumchip integriert sind. Dieser Druckkopf ist in 
ständigem Kontakt mit dem Papier. Ein anderes Prinzip arbei¬ 
tet mit malern Papier, bei dem die wärmeempfindliche 
Schicht auf dem Farbband aufgebracht ist. Durch Erhitzen 
des Widerstandes löst sich diese Schicht vom Farbband und 
bleibtauf dem Papier haften. Zwar sind Thermodrucker relativ 
kostengünstig und leise, doch steht der Aufwand für Spezial¬ 
papier und Farbband in keinem Verhältnis zum Anschaffungs¬ 
preis. 

Der Forbprofi - Okimote 20 


Zwar besteht der Okimate 20 (Bild 9) zu 80 Prozent aus Pla¬ 
stik und unhandlichen Hebeln, doch ist dieser Drucker ohne 
weiteres in der Lage, farbige Grafiken zu drucken. Das, was 
der Oki 20 aufs Papier zaubert, ist makellos. Die Farben 
leuchten und auch die Konturen sind einwandfrei zu erken¬ 
nen. Hardcopies lassen sich zwar nur langsam erstellen, 
dafür aber sind die Ergebnisse von brillanter Qualität. Ein klei- 



Bild 9. Der Okimate 20 - Farbdrucker mit Thermotechnik 
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ner Haken ist auch hier, wie bei allen anderen Thermo¬ 
druckern, der Preis für das Farbband. Es kostet 17 Mark und 
reicht ungefähr für 10 bis 12 Bilder. Zu einem Preis von 888 
Mark erhält man also ein Gerät, das zwar einiges zu wün¬ 
schen übrigläßt, aber trotzdem für Farbdrucke optimal geeig¬ 
net ist. 

Im Büroalltag zählen heute Typenradschreibmaschinen 
bereits zum Alltag. Die Drucktypen sind auf elastischen 
Armen eines Typenrades aus Metall oder Kunststoff befe¬ 
stigt. Durch Drehung wird das Rad in die richtige Druckposi¬ 
tion gebracht. Dann schlägt ein Hammer die Typen gegen 
Farbband und Papier. Obwohl in der Zwischenzeit auch die 
Matrixdrucker über eine sehr gute Druckqualität verfügen, ist 
das Schriftbild eines guten Typenraddruckers unerreicht. Die 
Domäne dieser Drucker liegt demzufolge in der Textverarbei¬ 
tung. Dabei sind solche Geräte, im Vergleich zu den Matrix¬ 
druckern, relativ langsam. Ein Nachteil dieser Technik ist die 
relativ hohe Geräuschentwicklung bei der Arbeit und die 
geringe Druckgeschwindigkeit. Leider beherrschen die 
Typenraddrucker keinerlei Grafik, wie es beispielsweise bei 
den Matrixdruckern der Fall ist. Ein Vorteil ist allerdings in der 
Vielfalt der zur Verfügung stehenden Schriften zu sehen. 
Typenräder können ohne große Umstände ausgewechselt 
werden und sofort steht ein neuer Schriftsatz zur Verfügung. 
Eine Sonderform des Typenraddruckers ist die Schreibma¬ 
schine mit eingebauter Schnittstelle zum Computer, die 
somit eine Doppelfunktion erfüllt. 

Auf dem Markt für Typenraddrucker kennt beinahe jeder 
die Firma Brother, die vor allem auch mit ihren mit Schnittstel¬ 
len ausgerüsteten Typenrad-Schreibmaschinen Furore 
machte. Ein reiner Typenraddrucker ist nun der HR 10 C. Der 
Drucker kann, wie auch einige Matrixdrucker, direkt an den 


C16 oder Plus/4 über ein serielles Schnittstellenkabel ange¬ 
schlossen werden. Das Handbuch des HR 10 C ist sehr aus¬ 
führlich und dürfte somit die meisten Probleme aus dem Weg 
räumen. 

Mit den vorhandenen DIP-Schaltern kann die Geräte¬ 
adresse verändert, der Zeilenvorschub geregelt, Standard- 
ASCII oder CBM-ASCII und acht nationale Zeichensätze aus¬ 
gewählt werden. 

Für ein individuelles Schriftbild stehen von der Firma Brot¬ 
her über hundert Typenräder zur Verfügung (je 59,85 Mark). 
Natürlich ist der Brother HR 10 C ohne weiteres in der Lage, 
automatisch unterstrichen, doppelt oder fett zu drucken. 
Auch einige Formatierungsanweisungen in Bezug auf Tabula¬ 
toren und Seitenränder stehen zur Verfügung. 

Erfreulich der niedrige Preis für den HR 10 C. Während 
viele Typenraddrucker mit dieser Leistung von den Kosten 
her das Budget des Heimanwenders übersteigen, liegt der 
HR 10 C hier mit 599 Mark voll im Rennen. 

Welcher Drucker ist der Richtige? 


Den Drucker, der auf die große Masse der Anwender zuge¬ 
schnitten und gleichzeitig alle individuellen Wünsche erfüllt, 
gibt es natürlich nicht und wird es auch nie geben. Die kleine 
Auswahl, die wir Ihnen geboten haben, soll Ihnen aber als 
Hilfe dienen, bevor Sie sich ein Gerät zulegen, das gerade 
Ihren individuellen Ansprüchen nicht gerecht wird. Auch 
beim Druckerkauf gilt: Es gibt immer den richtigen Drucker für 
bestimmte Anwendungen. Drucker, die alle Wünsche befrie¬ 
digen, wird es wie gesagt, nie geben. Ein Kompromiß muß 
immer geschlossen werden, gerade in den unteren Preis¬ 
klassen. (rf) 


Die Freude am Hebeln 


Um viele Anwendungen und Spiele überhaupt 
benutzen zu können, kommt keiner an den Joy¬ 
sticks und ähnlichen Eingabegeräten vorbei. Wir 
haben die wichtigsten für den C16 untersucht. 

D er Joystick hat sich als Eingabegerät durchgesetzt und 
inzwischen gibt es ein riesiges Angebot dieser kleinen 
Kästchen mit Hebel und Feuerknöpfen. Vor allem für 
kleinere Computer gibt es in allen Preisklassen und für jeden 
Geschmack das entsprechende Modell zu kaufen. Auch für 
den C16 gilt dieses Gesamtangebot, obwohl es nur einen 
Joystick gibt, der speziell für diesen Computer entworfen und 
sofort anschließbar ist. Da die Anschlußbuchse des Control- 
Ports am C16 nicht der Norm des C 64 oder anderer Compu¬ 
ter entspricht, muß man sich entweder einen Spezialadapter 
kaufen oder selber basteln. Sowie man diese Hürde jedoch 
genommen hat, steht einem die ganze Welt der Joysticks 
wieder offen. Aus diesem Grund werden wir uns auf verschie¬ 
denste Joysticks konzentrieren, die alle gängigen am Markt 
befindlichen Typen vertreten. Das wird Ihnen helfen, einen 
guten Überblick zu erlangen und den für die jeweilige Anwen¬ 
dung am besten passenden Joystick herauszufinden. So 
kann man vermeiden, bei einer eventuell anstehenden Kauf¬ 
entscheidung, vom Angebot erschlagen zu werden. 

Nicht nur der Preis ist entscheidend für die Auswahl des 
richtigen Joysticks. In der Ausstattung existieren gravierende 
Unterschiede zwischen den einzelnen Modellen. Ein Zusätz¬ 


liches an Ausstattung muß sich hierbei durchaus nicht immer 
in einem hohen Preis niederschlagen. Es gibt auch billige 
Joysticks, die tolle zusätzliche Möglichkeiten haben. Aller¬ 
dings muß man doch darauf hinweisen, daß es bezüglich der 
Verarbeitung sehr wohl besser ist ein etwas teureres Modell 
zu wählen, um nicht Gefahr zu laufen, daß das Gerät zu 
schnell verschleißt. Wer einmal den ersten Joystick an einem 
Spiel ruiniert hat, wird beim nächsten Mal lieber etwas mehr 
ausgeben, um zukünftigen Ärger von vornherein auszu¬ 
schließen. 

Joysticks und doch kein Spaß? 


Wenn man vor der Entscheidung steht, welcher Joystick der 
geeignete ist, so sollte man sich zuerst einmal über die haupt¬ 
sächlichen Anwendungsgebiete im klaren sein. Dabei kom¬ 
men grob gesagt zuerst einmal Spiele und Utilities in Frage. 
Bei den Anwendungsprogrammen kommt es im wesentli¬ 
chen auf ein gewisses Maß an Präzision an, mit dem sich zum 
Beispiel auch Mal- oder Zeichenprogramme gut ansprechen 
lassen. Für einen Spielejoystick muß man wieder unterschei¬ 
den, worauf man mehr Gewicht legen möchte; auf schnelle 
und leichte Handhabung oder auf Stabilität und Belastbarkeit. 
Das eine schließt zwar das andere nicht vollständig aus, 
jedoch befinden sich Joysticks, die dies alles in einigermaßen 
guter Qualität liefern, deutlich in den oberen Preisklassen 
des Angebots. Einige Spiele verlangen extrem intensives 
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Hin- und Herrütteln am Joystick, und dessen Hebel muß 
somit eine hohe Belastbarkeit aufweisen. Andere wiederum 
brauchen eine sehr genaue Eingabe, zum Beispiel bezüglich 
des 45-Grad-Winkels, und benötigen deswegen eine fühlbar 
genaue Richtungssteuerung. 

Sollten Sie sich über die hauptsächliche Verwendung des 
Joysticks im klaren sein, so ist vor einem Kauf eigentlich nur 
ein Punkt besonders wichtig: Testen Sie das jeweilige Modell 
direkt an einem Programm aus. Gerade bei Joysticks und 
ähnlichen Eingabegeräten ist es wichtig zu wissen, wie sich 
tatsächlich damit arbeiten läßt. Aller Tests und Tips von 
Bekannten zum Trotz, kann man nur so wirklich sagen, wie 
das Gerät sich anfühlt, denn man muß ja später oftmals stun¬ 
denlang damit in der Hand klarkommen. 

Joysticks unter der Lupe 


Als Kriterien zur Bewertung der einzelnen Joysticks wollen 
wir im folgenden auf vier Punkte konkret zu sprechen kom¬ 
men, ohne natürlich eventuelle Besonderheiten zu verges¬ 
sen, welche aber in der Kurzbesprechung des jeweiligen 
Geräts angeführt sind. 

Der erste Punkt hierbei ist, wie schon erwähnt, die Handha¬ 
bung, wobei es auf eine leichte und gute Bedienbarkeit, 
sowie auf ein allgemein gutes »Feeling« auch bei längerem 
Einsatz ankommt. Der zweite Punkt betrifft die Präzision bei 
der Eingabe von Steuerrichtungen. Wie genau und schnell 
läßt sich mit dem Gerät auch in 45-Grad-Winkeln lenken? Ein 
weiterer wichtiger Punkt ist die Stabilität und damit Belastbar¬ 
keit der gesamten Einheit. Verträgt der Joystick auch eine 
extrem kraftvolle Bedienung? Als letzter Punkt wäre noch die 
Geräuschentwicklung zu beachten, die bei der Bedienung 
entsteht. Die doch erhebliche Geräuschentwicklung bei Joy¬ 
sticks mit Mikroschaltern bietet eigentlich deren einzigen 
Schwachpunkt, da diese sich sonst hervorragend am Markt 
durchgesetzt und auch bewährt haben. 

Zu den Joysticks im einzelnen: 

Commodore C16-Plus/4-Joystick 

Dies ist der einzige der hier vorgestellten Joysticks, der 
sich sofort an den »exklusiven« Control-Port des C16 
anschließen läßt. Er liegt trotz seiner einfachen Gestaltung 
erstaunlich gut in der Hand und ermöglicht auch längeres 
Arbeiten. Nachteilig wirkt sich natürlich aus, daß er nur einen 
Feuerknopf und diesen auch noch an der Stick-Spitze hat. 
Ansonsten glänzt er durch relativ geräuschloses Funktionie¬ 
ren, was er aber nur deswegen schafft, weil er keine Mikro¬ 
schalter, sondern Metallzungenkontakte besitzt. Dabei 



Bild 1. Commodore Joystick, Quickshot I, II plus, und II turbo 
(von links nach rechts) 


besteht bei längerem Gebrauch immer die latente Gefahr, 
daß diese ausleiern. Außerdem ist er damit an Steuerungsge¬ 
nauigkeit auch etwas unterlegen. Wenn man allerdings kein 
Bastler ist, und auch keine weiteren Kosten für einen Adapter 
zum Anschluß einplanen will, ist dieser Joystick sicherlich 
eine preiswerte Alternative (Bild 1). 


Quickshot I 

Der erste Joystick aus der Reihe der erfolgreichen Quick¬ 
shots ist mit Plättchenkontakten ausgestattet. Im Prinzip gel¬ 
ten deswegen die gleichen Einschränkungen wie für den 
Commodore-Joystick. Zusätzlich ist zu sagen, daß er mit vier 
relativ großen Saugfüßen ausgestattet ist, die ihn gut auf 
einer glatten Unterlage festhalten können. Auch die zwei 
Feuerknöpfe sind positiv zu erwähnen, jedoch muß man 
wegen ihrer mangelnden Genauigkeit einige Abstriche 
machen. Obwohl die Designer sich einige Mühe gegeben 
haben, ist das gesamte Gerät nicht besonders ergonomisch 
noch stabil ausgefallen (Bild 1). 

Quickshot II plus 

Die Weiterentwicklung auf dem Gebiet Quickshot bringt 
deutlich besseres Steuerungsverhalten, Festigkeit und einen 
Schalter für Dauerfeuer. Auch dieses Gerät hat Saugfüße, 
kann jedoch auch aufgrund des lockeren Steuerhebels nicht 
völlig überzeugen. Ansonsten sind die zwei Feuerknöpfe im 
sehr ergonomisch geformten Griff ein Plus für diesen Joy¬ 
stick. Alle Schalteinheiten sind auf Mikroschalterbasis aus¬ 
gelegt (Bild 1). 

Quickshot II turbo 

Auch dieser Joystick bietet ähnliche Eigenschaften wie 
der Quickshot II plus, wie Saugfüße, Dauerfeuer, ergonomi¬ 
scher Handgriff sowie zwei Feuerknöpfe im Stick. Er fällt 
allerdings durch eine etwas bessere Verarbeitung und präzi¬ 
seres Steuerverhalten auf. Außerdem hat er ein modisches 
Design und eine andere Farbe als das übliche Einheits¬ 
schwarz (Bild 1). 

Quickshot IV 

Bei dieser Version wurde direkt die Version I zur Vorlage 
genum nen. Die gesamte Verarbeitung ist gegenüber dem 
Vorgänger jedoch wesentlich besser ausgefallen und kann 
trotz Metallzungenkontakten bezüglich der Genauigkeit der 
Steuerung überzeugen. Als besondere Zugabe gibt es die¬ 
sen Joystick mit drei verschiedenen, auswechselbaren Grif¬ 
fen, mit denen man sich vom Steuergefühl her nach eigenem 



Bild 2. Quickshot IV, Quickshot IX, Quick Gun Turbo 3 und 
Superjoy 28 


Geschmack ausrüsten kann. Nachteilig ist eigentlich nur, daß 
diese aus Gummi gefertigten Griffe relativ leicht von der 
Innenhalterung rutschen, wenn man am Hebel etwas ungün¬ 
stig zieht (Bild 2). 

Quickshot IX 

Dieser Joystick hat ein sehr ungewöhnliches Eingabeprin¬ 
zip und wird deswegen vom Hersteller auch als Joyball 
bezeichnet. Man sollte sich aufgrund des Aussehens nicht 
dazu hinreißen lassen, den Quickshot IX mit einem Trackball 
zu verwechseln, denn das Grundprinzip der Steuerung ist 
doch das gleiche geblieben, wie bei jedem anderen Joystick 
auch. Anstelle des gewohnten Hebels ist eine aus Plastik 
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gefertigte Halbkugel angebracht, die gekippt werden kann. 
Dadurch ergibt sich natürlich ein völlig neues Gefühl beim 
Steuern; schlecht ist der Joyball jedoch deshalb keineswegs. 
Die große Auflagefläche für die Hand des Benutzers ermög¬ 
licht eine sehr präzise Handhabung. Es ergeben sich daraus 
aber auch relativ große Schaltwege, und das gesamte Gerät 
wird für schnelle Anwendungen etwas zu langsam. Sehr gut 
sind die zwei großen Feuertasten, die auch mit Dauerfeuer 
beschältet werden können, sowie die Saugfüße. Da die 
gesamte Einheit so benutzt werden muß, daß die Feuertasten 
zur Seite zeigen, kann man das Gerät für Links- oder Rechts¬ 
händer umschalten (Bild 2). 

Quick Gun Turbo 3 

Auch dieser Joystick wird ähnlich dem Quickshot IV mit drei 
auswechselbaren Griffen ausgeliefert, wobei diese nicht aus 
Gummi, sondern aus Hartplastik gefertigt sind. Insgesamt 
macht alles einen sehr stabilen Eindruck, wozu auch die 
Saugfüße und die Mikroschalter beitragen. Beim genaueren 
Untersuchen ist die Steuerung jedoch ziemlich schwergän¬ 
gig und mit langen Wegen versehen. Der Feuerknopf auf der 
Stick-Spitze sowie auch die beiden im Sockel eingelassenen 
Feuerknöpfe mit ihren Plättchenkontakten sind allerdings 
eine schlichte Zumutung (Bild 2). 

Superjoy 28 

Obwohl der Superjoy mit seinen im Verhältnis zum Rest des 
Gehäuses relativ großen Saugfüßen auch eine große Stand¬ 
festigkeit verspricht, kann dies bei intensiverem Testen keine 
Bestätigung finden. Die knipsigen Plättchenkontakte tragen 
nicht dazu bei, den Gesamteindruck zu verbessern, zumal sie 
mit Dornen heruntergedrückt werden, bei denen ein schnel¬ 
ler Verschleiß vorprogrammiert ist. Einzig die handfreundlich 
angebrachten Feuerknöpfe, die sich in den Gehäuseseiten 
gegenüberliegen, fallen positiv auf (Bild 2). 

The Arcade 

Von der Ausführung her dürfte dieser Joystick den Ver¬ 
gleich mit den besten seiner Klasse standhalten. Der Hebel 
ist relativ leichtgängig und hat trotz Mikroschaltern kurze 
Wege. Er ist sehr robust ausgeführt, hat aber nur kleine Gum¬ 
mifüßchen. Deshalb ist er im wesentlichen darauf ausgelegt, 
in der Hand gehalten zu werden. Gerade in diesem Punkt bie- 



Bild 3. The Arcade, Speedking, Flre 1 und Cobra (v. I. n. r.) 


tet er jedoch den einzigen Ansatzpunkt zur Kritik, denn 
obwohl er eine ganz besondere Form hat, liegt er kantig in der 
Hand und der Feuerknopf ist vor allem für Leute mit kleinen 
Händen nicht leicht zu bedienen (Bild 3). 

Speedking 

Wer einen Joystick sucht, der wirklich gut in der Hand liegt, 
wird mit dem Speedking genau das richtige bekommen. Kein 
anderer Joystick am Markt kann eine so gute ergonomische 
Gestaltung aufweisen. Dafür ist er natürlich völlig ungeeignet 


für den Betrieb auf irgendeiner Unterlage, zumal der Feuer¬ 
knopf auch noch an der Unterseite angebracht ist. Die Mikro¬ 
schalter und der kleine Hebel mit dem kurzen Schaltweg run¬ 
den das gute Gesamtbild ab. Nur gewöhnungsbedürftig ist 
das Gerät gegenüber herkömmlichen Joysticks schon (Bild 3). 

Fire 1 

Der Fire 1 ist der einzige Joystick, den man in vielen ver¬ 
schiedenen Farben ganz nach eigenem Geschmack kaufen 
kann. Der Griff und das Gehäuse liegen beim Steuern gut in 
der Hand, nur die Saugfüße sind bei diesem doch recht gro¬ 
ßen Gerät etwas klein ausgefallen und können sich daher 
zum Beispiel bei heftigem Herumwirbeln leicht von der Unter¬ 
lage lösen. Obwohl kompromißlos mit Mikroschaltern ausge¬ 
rüstet, ist die Feuerknopf-Leiste nicht unbedingt optimal im 
Sockel angebracht und ausgeführt. Bei Daueranwendung ist 
sie der erste Grund für einen Krampf in der Hand (Bild 3). 

Cobra 

Der schwerste und zugleich robusteste unter allen Joy¬ 
sticks ist der Cobra. Viele würden sich ihn gerne zulegen, 
wäre da nicht der enorm hohe Preis. In einem sehr schweren 
Metallgehäuse eingelassen und mit einem unverwüstlichen 
Steuerknüppel versehen, hat der Cobra Normal- und Dauer¬ 
feuer und eignet sich auch von der Form her wohl am ehesten 
für Flugsimulatoren. Der Hebel hat einen viel zu langen 
Schaltweg und ist zudem sehr schwergängig. Man braucht 
richtig Kraft, um ihn zu bedienen. Warum das Gerät allerdings 
mit so relativ kleinen und dazu noch leicht herausreißbaren 
Saugfüßen ausgestattet ist, bleibt angesichts der sonstigen 
monumentalen Ausführung wohl ein Geheimnis des Herstel¬ 
lers (Bild 3). 

Competition Pro 5000 

Mit gulv' Verarbeitung und leichter Handhabung kann die¬ 
ser Joystick aufwarten. Obwohl er keine Saugfüße hat, sollte 
man ihn nicht unterschätzen; er liegt auch bei längerem 
Gebrauch ausgezeichnet in der Hand. Mit den kurzen Schalt¬ 
wegen der Mikroschalter, präzise zu steuernden Richtungen 
und robustem Gehäuse kann er eigentlich voll überzeugen 
(Bild 4). 

Professional Competition 9000 

Dieser noch relativ neue Joystick hat ein ähnliches 
Gehäuse wie der Pro 5000. An der Schaltungsmechanik des 
Hebels wurde jedoch einiges verändert und auch verbessert. 
Von der Steuerung her ist er noch besser als der ohnehin 
schon gute Pro 5000. Einzig die Feuerknöpfe fallen gegen- 



Blld 4. Competition Pro 5000, Pro. Comp. 9000, Senso Stick 
und Joycard 


über dem altbewährten Bruder deutlich ab und wurden etwas 
zu wackelig ausgeführt (Bild 4). 

Senso Stick 

Eine Mischung zwischen Joystick und dem Prinzip einer 
Joycard ohne Steuerhebel ist der Senso Stick. Am Griff befin¬ 
det sich dazu ein kleiner Massekontakt und die Steuerung 
sowie auch der Feuerknopf werden durch bloßes Berühren 
der entsprechenden Kontakte betätigt. Obwohl der Senso 
Stick gut in der Hand liegt, ist eine Steuerung wegen der eng 
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C16 

Plus/4 

Belegung 

C64 

VC 20 
andere 

1 

Kontakt 0 

1 

2 

Kontakt 1 

2 

3 

Kontakt 2 

3 

4 

Kontakt 3 

4 

5 

+ 5 Volt 

7 

6 

Feuerknopf 

6 

7 

GND/Masse 

8 

8 

D1/D2 

/ 

/ 

Paddle Y 

5 

1 

Paddle X 

9 


nebeneinander liegenden Kontakte auf der Stick-Oberseite 
sehr schlecht möglich. Zudem hat man dabei keinen richtigen 
Ruhepunkt für den Daumen. Ein Krampf in der Hand ist nach 
fünf Minuten Spiel kaum zu vermeiden (Bild 4). 

Senso Joycard Sunshine 

Bei dieser richtigen Joycard ist das gesamte Gehäuse der 
Massekontakt und die Steuerung erfolgt auch durch Berüh¬ 
ren der entsprechenden Flächen auf der Oberseite, die 
durch Gummi voneinander getrennt sind. Von den zwei Feu¬ 
erkontakten ist einer für Dauerfeuer ausgelegt. Obwohl ein 
einigermaßen großer Ruhepunkt für die Steuerung vorhan¬ 
den ist, kann man Fehlkontakte kaum vermeiden. Überhaupt 
muß man schon sehr viel üben, um mit dem Gerät einigerma¬ 
ßen klar zu kommen (Bild 4). 

Aus diesen Angaben sollte es möglich sein den richtigen 
Joystick auch für Sie herauszufinden. Für eine Übersicht 
über alle besprochenen Geräte benutzen Sie bitte die Tabelle 
(Bild 6). Darin sind in Kurzform alle wichtigen Eigenschaften 
der einzelnen Joysticks zusammengefaßt. Wenn Sie zu den¬ 
jenigen gehören, die sich nicht davor scheuen, sich einen 
Adapter für den Anschluß von Joysticks selbst zu basteln, um 
alle besprochenen Joysticks anschließen zu können, so 
beachten Sie die Übersicht in (Bild 5). Darin sind die einzel¬ 
nen Kontakte mit ihrer entsprechenden Belegung gegen¬ 
übergestellt. Wenn Sie einen C64-kompatiblen Joystick an 
den C16 anschließen wollen, müssen die Kontakte 0 bis 3, 
Feuerknopf, Masse und +5 Volt des C16 mit den entspre- 


1 2 3 4 5 

o o o o o 

6 7 8 9 

o o o o 


C64 

VC 20 u. a. 

Bild 5. Die Pinbelegung vom C16, Plus/4 im Vergleich zur 
üblichen Norm 


chenden Leitungen des Joysticks verbunden werden. Falls 
Sie e>r‘*.-fi fertigen Adapter kaufen möchten, so kann bei Hel¬ 
mut Stechmann, Sonntagstraße 20, 2152 Horneburg, für 
9,90 Mark einer bestellt werden. (jk) 


Informationen zu den Joysticks: 

A. Commodore, Lyonerstr. 38. 6000 Frankfurt 71 

B. Bernd Jöllenbeck, Im Dorf 5, 2370 Weertzen 

C. IMPS Mikrocomputer, Paulistr. 27-29, 5020 Frechen 

D. Conrad Electronics. Schillerstr. 23a, 8000 München 2 

E. Watzdorf. Grauer-Stein-Weg 9, A-6020 Insbruck 

F. Merlin Data Electronic, Kay-Römerfeld, 8261 Tlttmoning 
G Dynamics, Große Bäckerstr. 11, 200 Hamburg 

H. Clmring Trading Company, Schöne Aussicht 9, 6236 Eschborn 2 

I. Otronic, Hetzendorferstr. 182, A-1130 Wien 

J. diverse Kaufhäuser und Computershops 


Bezeichnung 

Saugnäpfe Feuerknöpfe Dauerfeuer Schaltertyp 

zirka Preis 
in Mark 

Anbieter 

Commodore Joystick für C16/Plus/4 

N 

1 

N 

Metallzungen 

etwa 25 

A 

Quickshot 1 

J 

2 

N 

Metallzungen 

8 

B 

Quickshot II Plus 

J 

2 

J 

Mikroschalter 

k. A. 

C 

Quickshot II Turbo 

J 

2 

J 

Mikroschalter 

30 

B 

Quickshot IV 

J 

2 

N 

Metallzungen 

23 

B 

Quickshot IX 

J 

2 

J 

Mikroschalter 

20 

B 

Quick Gun Turbo 3 

J 

3 

J 

Mikroschalter 

45 

D 

Superjoy 28 

J 

3 

N 

Plättchen 

20 

D 

The Arcade 

N 

1 

N 

Mikroschalter 

55 

E 

Speeding 

N 

1 

N 

Mikroschalter 

30 

J 

Fire 1 

J 

2 

N 

Mikroschalter 

35 

F 

Cobra 

J 

3 

J 

Mikroschalter 

190 

J 

Competition Pro 5000 

N 

2 

N 

Mikroschalter 

40 

B, G, H 

Pro. Competition 9000 

N 

2 

N 

Mikroschalter 

60 

E 

Senso Stick 

N 

1 

N 

Sensorschalter 

28 

1 

Senso Joycard 

N 

2 

J 

Sensorschalter 

49 

E 


Bild 6. Die Eigenschaften der getesteten Joysticks im Überblick 
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C16, Plus/4 


SPIELE 


Verspielte 
Stunden am 

C16 und Plus/4 


Immer noch eine der schönsten Anwendungen 
des Computers ist ein zünftiges Spiel, das, bei 
geeigneter Auswahl, für viel Unterhaltung sorgt. 

C omputern bedeutet nicht nur programmieren, sondern 
auch spielen. Angesichts der heute erhältlichen Spiele¬ 
software ist das ja auch keine Schande, denn es gibt 
genug »intelligente« Spiele, die nicht nur Reaktionstests, son¬ 
dern geradezu logische Rätsel für den Spieler sind. 

Im folgenden stellen wir Ihnen einige Glanzpunkte aus der 
Spielewelt für C16 und Plus/4 vor. Wenn nicht anders ange¬ 
geben, sollten die Plus/4-Spiele auch auf jedem auf 64 
KByte aufgerüsteten C16 funktionieren. Dies können wir 
aber nicht im einzelnen garantieren. Genauso kann es pas¬ 
sieren, daß das eine oder andere reine C16-Spiel nicht auf 
dem Pjus/4 funktioniert. 

Die Ära der Computerspiele begann mit Action-Program¬ 
men. Namen wie »Space Invaders« oder »Defender« machten 
schnell in den Spielhallen Furore und konnten sich als Tele¬ 
spiel auch schon bald die Wohnzimmer erschließen. Heutzu¬ 
tage hat man es meist mit intelligenteren Actionspielen zu 
tun, bei denen der Spieler auch geistig gefordert wird. 

»Trailblazer« ist die verrückte Umsetzung eines bizarren, 
futuristischen Ballspiels. Ein kleiner Ball muß über mehrere 
Laufbänder springen, die in atemberaubender Geschwindig¬ 
keit unter dem Ball durchlaufen. Die Farben des Bandes 
haben dabei bestimmte Bedeutungen. So wird der Ball auf 
manchen Farben gebremst, auf anderen beschleunigt oder in 
die Luft geschleudert. Natürlich dürfen auch Löcher, durch 
die man einfach plumpst, nicht fehlen. Dies sind nur die ein¬ 
fachsten Schikanen, andere Farben lösen noch verrücktere 
Vorgänge aus. Die Grafik von Trailblazer ist erstaunlich flott 
und wirkt dadurch verblüffend dreidimensional. Ein klares 
Muß für alle C16-Besitzer, die sich für etwas unterhaltsame 
Action interessieren. 

In die Lüfte geht es mit »ACE«, einem actionreichen Flugsi¬ 
mulator, den es gleich in zwei verschiedenen Versionen gibt: 
Wer nur 16 KByte sein eigen nennt, muß mit einer etwas 
abgespeckten Version mit weniger Gegnern und schlichterer 
Grafik vorlieb nehmen. Bei 64 KByte Speicher (Plus/4 oder 
Erweiterung) geht allerdings die Post ab: Die uns vorliegende 
Plus/4-Version ist bis auf Details mit der C 64-Version iden¬ 
tisch und hat sogar eine Sprachausgabe. Handlung gibt es 
bei ACE nur wenig: Der Spieler hat sich um drei Basen zu 
kümmern, die der böse Gegner in Grund und Boden stamp¬ 
fen will. Zu diesem Zweck schwingt er sich in seinen Jet und 
macht sich auf, alle Panzer, Hubschrauber, Flugzeuge und 
Flugzeugträger der feindlichen Truppen zu vernichten. 
Besonderer Gag ist eine Auftank-Sequenz, bei der man sein 
Flugzeug in der Luft von einem anderen auftanken lassen 
muß. ACE hat eine schnelle 3D-Grafik, die das Flugerlebnis 
ziemlich realistisch wirken läßt. Da es sich bei ACE in erster 
Linie um ein Action-Spiel handelt, ist der Simulations-Wert 
nicht besonders hoch. Für die angesprochenen Computer ist 
es aber das Beste, was es auf diesem Gebiet gibt. 



Farbenpracht, die Freude macht: »Trailblazer« 


Ebenfalls den Touch einer Flugsimulation hat »Mercenary« 
(nur für Plus/4), ein gewitztes Action-Spiel, bei dem der Spie¬ 
ler auch zum Denken herausgefordert wird. 

Sie übernehmen die Rolle eines Sternensöldners, der auf¬ 
grund eines Defekts auf dem Planeten Targ notlanden muß. 
Targ wiederum ist der Schauplatz kriegerischer Handlungen 
zwischen den Palyars und den Mechanoids. Beide Seiten 
machen dem Spieler lukrative Angebote, die Anlagen des 
jeweiligen Gegners zu sabotieren. Sie müssen sich nun ent¬ 
scheiden. Wichtig ist dabei der Faktor des Geldes: Nur wenn 
Sie genügend Geld verdienen, können Sie sich die Flucht 
vom Planeten Targ auch wieder leisten. 

Mercenary hat eine brillante, schnelle 3D-Vektor-Grafik, die 
die Landschaft genauso zeigt, wie die Spielfigur sie gerade 
sehen würde. Die nahezu identische C 64-Version war übri¬ 
gens ein großer Hit, so daß dem Erfolg der Plus/4-Version 
nicht viel im Wege stehen dürfte. 

Ganz ohne Schießerei, aber nicht minder actionreich geht 
es bei einer Spielhallenumsetzung zu. Unser Held namens 
»Bomb Jack« (CI6) muß Bomben entschärfen, die gemein¬ 
gefährliche Terroristen auf verschiedenen Plattformen abge¬ 
legt haben. Die Terroristen sehen dem natürlich nicht tatenlos 
zu und verfolgen unseren kleinen Supermann. Bizarrerweise 
gibt es dann noch einen Vogel, dessen Berührung tödlich ist. 
Außerdem verwandeln sich die Terroristen nach kurzer Zeit in 
fliegende Bomben und Schnecken, was nun jeglicher Logik 
entbehrt. 

Die Handlung tut aber nichts zur Sache, wenn es um den 
Spielwitz geht, und der ist bei Bomb Jack ziemlich groß. Ver¬ 
blüffend ist im Übrigen, daß die C 64-Version wesentlich 
schlechter und fast schon unspielbar gegenüber der 
C16-Version ist. Allein aus dem Grund, einen C64-Besitzer 
mal richtig zu ärgern, sollte man sich Bomb Jack zulegen. 

Für die C 16-Besitzer gibt es aber noch einen echten Ham¬ 
mer, der uns beim Testen beinahe vom Stuhl gerissen hat. Die 
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Mit dem Kampfflieger in die Lüfte: »ACE« 



Rede ist von der »Winter-Olympiade«, bei der sich bis zu vier 
Spieler im sportlichen Geschick messen können. 

Beeindruckend sind am Programm die vielen unterschied¬ 
lichen Grafiken und die Animation der Spielfiguren. Für 
Kassetten-Besitzer ist das Spiel allerdings etwas umständ¬ 
lich, da alle Disziplinen von Datasette einzeln geladen wer¬ 
den, was aber dank eines Fast-Loaders kaum eine Minute 
dauert. Alles in allem gehört Winter Olympiade technisch zum 
Besten, was für den C16 oder den Plus/4 überhaupt erhält¬ 
lich ist. 

Kommen wir nun zu einer völlig anderen Art von Spielen, 
den Adventures, eingedeutscht auch »Abenteuerspiele« ge¬ 
nannt. Für den C16 gibt es nur recht wenige Adventures, da 
diese meist auf viel Speicherplatz angewiesen sind. Deswe¬ 
gen soll hier eine kurze Erklärung des Adventure-Begriffs fol¬ 
gen: 

Ein Adventure ist ein großes logisches Rätsel, das meist in 
einer fernen Welt aus einem literarischen Genre, sei es 
Science-fiction, Fantasy oder Kriminal-Story, spielt. Der Spie¬ 
ler übernimmt die Rolle des Helden: Der Computer zeigt auf 
dem Bildschirm eine Situationsbeschreibung, die sich wie ein 
Absatz eines Buches liest, der Spieler tippt daraufhin ein, wie 
sich sein Held in dieser Situation verhält. Der Spieler kann 
dabei seine Kommandos in natürlicher Sprache eingeben. 
Um nach Norden zu gehen, tippt man »Go North«, mit »Take 
Lamp« nimmt man die gerade gefundene Lampe an sich. Sie 
werden schon bemerkt haben, daß die Adventures gerne 
Englisch mit Ihnen reden würden. Das hat zwei Gründe. 



Viel Action und viel Scrolling: »Terra Cognita« 


Bomben-Sammeln im Ausland: »Bomb Jack« 



Zuerst einmal kommen alle uns bekannten Adventures für 
den C16 aus England oder Amerika, zum anderen ist die 
deutsche Sprache wesentlich komplizierter, so daß ein 
deutschsprachiges Adventure noch mehr Speicherplatz 
benötigen würde. Schließlich muß sich der Computer mit vie¬ 
len Wörtern und Satzkonstruktionen auseinandersetzen und 
nebenbei auch noch die ganzen Texte, die ausgegeben wer¬ 
den sollen, im Speicher unterbringen. So verwundert es auch 
nicht, daß es für den C16 drei Adventures als Module gibt. 
Auf dem Modul ist das komplette Programm untergebracht, 
damit der Speicher des C16 für die Analyse der Eingabe ver¬ 
wendet werden kann. 

Bei den drei Modulen handelt es sich um »Pirate Adven¬ 
ture«, »Sudnge Odyssey« und »Atomic Mission«. Leider sind 
die drei Programme nicht allzu umfangreich und haben auch 
wenig eingebaute »Intelligenz«. Allerdings sind sie für einen 
Adventure-Einsteiger gut geeignet, um festzustellen, ob ihm 
diese Art von Spiel überhaupt zusagt. 

Für die Adventure-Profis unter unseren Lesern gibt es aber 
eine große Gruppe von Adventures, die zwar etwas teurer 
sind, aber dafür ungetrübtes Adventure-Vergnügen ausstrah¬ 
len. Dabei handelt es sich um die Programme der Firma Info- 
com. Diese Firma ist schon seit einigen Jahren nur mit der 
Entwicklung von Adventures beschäftigt und kann deswegen 
einen hohen technischen Standard vorweisen. Allerdings 
haben Infocom-Programme einen kleinen Nachteil: Sie sind 
nur beschränkt lieferbar und laufen nur auf Plus/4-Compu- 
tern mit angeschlossenem Diskettenlaufwerk. 



Knall und Fall im Eiskanal: »Winter-Olympiade« 
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SPIELE 



Zu den lieferbaren Titeln gehört beispielsweise die Zork- 
Trilogie, die aus drei unabhängigen Adventures besteht. Hier 
hat der Spieler die Aufgabe, in einem zauberhaften Land die 
bösen Zauberer in ihre Schranken zu verweisen. Dabei geht 
es nicht immmer bierernst zu, so daß man sich beim Spielen 
oft genug nicht gegen das Grinsen wehren kann. Wer sich 
näher mit dem Thema Adventures beschäftigen will, kommt 
um den Kauf dieser Programme kaum herum. 

Natürlich ergibt sich manchmal das Problem, daß das 
Taschengeld nicht für den neuesten Spielehit reicht. Als 
Alternative wird dann oft Billig-Software angeboten. Für unter 
zehn Mark ist man beim Spielevergnügen dabei. Und tatsäch¬ 
lich, viele der angebotenen Produkte sind ihr Geld wert und 
können mit teureren Kollegen mithalten. Verschwiegen wer¬ 
den soll aber nicht, daß es gerade auf diesem Sektor einige 
»Nieten« gibt, die eigentlich in den Papierkorb gehören. 

Wer nach einem guten Billigspiel sucht, braucht sich 
eigentlich nur die Namen von drei Herstellern zu merken: 
Mastertronic, Codemasters und Firebird (Silver Range). Bis 
auf wenige Ausnahmen sind die Programme dieser Hersteller 
empfehlenswert. Zur Sicherheit wäre es aber immer ange¬ 
bracht, sich das Spiel, wenn möglich, einmal vorführen zu las¬ 
sen. Als kleine Hilfe stellen wir Ihnen im folgenden noch ein 
paar Billigspiele vor, die uns in den letzten Tagen sehr positiv 
aufgefallen sind. 

Viel Action mit Geballer gibt es bei dem etwas abstrakten 
Spiel »P.O.D.«. Der Spieler steuert einen POD über ein Draht¬ 
gitter und muß alle möglichen Angreifer abwehren. Mehr 
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Handlung gibt es eigentlich nicht. Das Spiel ist dafür rasend 
schnell und macht ungeheuren Spaß. Für den C16 gibt es im 
Billig-Bereich kaum etwas Besseres. 

Ebenfalls mit viel Geballer ist »Terra Cognita« verbunden. 
Wichtigstes Merkmal ist der von oben nach unten sanft 
durchrollende Bildschirm, auf dem der Spieler zahlreiche 
Gegner und Gebäude vernichten muß. Auch dieses Spiel ist 
recht unterhaltsam. 

Ganz ohne Schießereien kommt »Spiky Harold« aus. Ein 
kleiner Igel ist auf dem Weg in den Winterschlaf und will sich 
vorher noch mal richtig sattfressen. So läuft er durch eine 
stattliche Anzahl von Bildschirmen, immer auf der Suche 
nach neuer Nahrung. Aufpassen muß er auf die anderen 
Bewoi n ,er des Waldes, damit diese sich nicht gegenseitig 
weh tun. Obwohl die Handlung dieses Spiel gerade auch für 
kleinere Kinder tauglich machen würde, ist Spiky Harold nur 
für Joystick-geschickte Naturen mit viel Geduld geeignet. 
Das Spiel ist nämlich ziemlich schwer. 

Damit wollen wir unseren kleinen Rundgang durch die 
Spielewelt für C16 und Plus/4 beenden. Zum Schluß geben 
wir Ihnen noch einige Adressen, an die Sie sich wenden kön¬ 
nen, wenn Sie Spiele für Ihren C16 oder Plus/4 erwerben 
möchten. (bs) 


Ifl, Dipl.-Ing. H. Stochmann, 21B2 Hornoburg, Sonntagstr. 20 
Mastertronic GmbH, Kaisor-Otto-Weg 18, 4770 Soest 
Ruahware, Daimlerstr. 13, 4044 Kaarst 2 
Arlolasoft, Postlach 1350, 4830 Gütersloh 



Auf der Flucht von Targ: »Mercenary« 
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GRUNDLAGEN 


Die Floppy 
1551 





Bild 1. 

Die Platine der 
Floppy 1551. In der 
Mitte sehen Sie die 
Lötbrücke (JP1). 


unter der Lupe 


Die 1551 wurde speziell für den C16 und Plus/4 
entwickelt. Wir zeigen Ihnen im folgenden Artikel, 
was sich mit dieser Floppystation alles anfangen 
läßt. G « 6B o 

S chön steht sie da, die neue Floppy 1551, die mit ihrem 
schwarzen Kleid nicht nur optisch zu Ihrem Plus/4 paßt. 
Auch in technischer Hinsicht ist sie eine gute Ergänzung 
zum Plus/4. Sie hat nämlich gegenüber der 1541, die man 
auch mit dem Plus/4 betreiben kann, einige Vorteile. 

Schon von außen zeigen sich wesentliche Unterschiede zu 
ihrem Vorgänger. So sucht man vergeblich nach einem seriel¬ 
len Bus. Statt dessen findet man ein langes Kabel, das fest 
mit der Floppystation verbunden ist und an ihrem Ende ein 
seltsam anmutendes Kästchen hat. Dies ist der parallele Port, 
der den Datentransfer beschleunigt. Die Übertragung geht 
etwa fünfmal schneller vonstatten, als man es von der Floppy 
1541 her kennt. 

Für manchen Einsteiger bleibt die 1551 im wahrsten Sinne 
des Wortes ein schwarzer Kasten, in dem Fähigkeiten 
schlummern, die man so ohne weiteres nicht erfährt. Aus die¬ 
sem Grund bringt Ihnen der folgende Bericht die Fähigkeiten 
der Floppy 1551 näher, wobei er für den Anfänger und auch 
etwas Fortgeschrittenen die wichtigen Möglichkeiten auf¬ 
zeigt. 

Bevor Sie in die Welt der Floppy 1551 einsteigen, sollten 
Sie für die richtige Verbindung zum Computer sorgen. Der 
parallele Port (das schwarze Kästchen am Ende des langen 
Kabels) muß dabei in den Expansion-Port des C16 oder 
Plus/4 eingeschoben werden. Weitere Floppystationen oder 
ein Modul können dann am Stecker selbst angeschlossen 
werden. Insgesamt dürfen Sie zwei Floppylaufwerke 1551 
mit Ihrem Computer betreiben. Wem das nicht genügt, der 
kann noch weitere Laufwerke des Typs 1541 an den seriellen 
Port anschließen. Dabei kann jede eine eigene »Hausnum¬ 
mer« bekommen, mit der sie dann aufgerufen werden Dazu 
erfahren Sie später mehr. .,, i W" 

Haben Sie sich vergewissert, daß sämtliche Verbindungen 
stehen, können Sie alle Geräte einschalten. In welcher Rei¬ 


henfolge Sie das tun, spielt dabei keine Rolle. Es empfiehlt 
sich aber, zunächst die Floppy 1551 und danach erst den 
Computer einzuschalten. Gleich nach dem Einschalten des 
Computers schickt dieser nämlich ein Signal zu allen Floppy- 
stationi n, das sie veranlaßt, sich in den Einschaltzustand zu 
begeben. 

Lösen Sie nie irgendwelche Verbindungen, wenn die 
Geräte aktiv sind! Dadurch können Sie Ihrem Computer oder 
dem Diskettenlaufwerk beträchtliche Schäden zufügen. 

Sofort nach dem Einschalten beginnt sich der Laufwerkmo¬ 
tor zu drehen und die Floppy führt einen Selbsttest durch. Ist 
alles in Ordnung, geht die rote Leuchtdiode am Laufwerk aus, 
und der Motor bleibt stehen. 

Dadurch, daß die Floppy 1551 den Selbsttest eigenständig 
durchführt, kann man vermuten, daß sie ein gewisses Eigen¬ 
leben besitzt und nicht nur Daten auf die Diskette schreibt 
oder von der Diskette liest. Dies ist in der Tat der Fall. Die 
Floppy 1551 besitzt neben dem Schreib-/Lesemechanismus 
ein eigenständiges Betriebssystem, das DOS, und hat sogar 
ein eigenes RAM zur Speicherung von Daten. 

Das DOS (»Disk Operating System«) übernimmt die 
gesamte Steuerung der Abläufe in der Diskettenstation und 
sorgt selbständig für das Schreiben und Lesen von der Dis¬ 
kette. Diese Art von Floppylaufwerken bezeichnet man auch 
als »intelligent«. Ihre Floppy 1551 ist in diesem Sinne ein 
etwas ungewöhnlich aussehender, aber eigenständiger 
Computer, der über ein Kabel, verbunden mit dem Plus/4, 
Daten austauscht. Anders als bei den »dummen« Laufwer¬ 
ken, muß der Computer der Floppy 1551 nur noch sagen, 
was getan werden soll. Die Arbeit übernimmt die Floppy dann 
selbsttätig, wie auch den zuerst erwähnten Selbsttest. 

Die ersten Kontakte 


Nachdem Sie jetzt wissen, daß Sie mit der Floppy 1551 
eigentlich einen zweiten Computer erworben haben, wird es 
Zeit, daß Sie lernen, damit umzugehen. Dank des ausgefeil¬ 
ten Basic Ihres Plus/4 wird dies auch vorerst nicht allzu 
schwer werden. So haben Sie für alle wichtigen Diskettenak- 
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tionen Basic-Befehle zur Verfügung, mit denen Sie die Flop¬ 
pystation auf denkbar einfache Weise bedienen können. 
Dennoch sollen auch die Befehlsfolgen aufgezeigt werden, 
die man mit dem einfachen Basic 2.0 des C64 dafür tippen 
muß. Dies dient zum einen der Vollständigkeit und zum ande¬ 
ren ist es eine gute Art, die Arbeitsweise der Floppy 1551 
näherzubringen, da man in Basic 2.0 elementarer arbeiten 
muß. 

Sicherlich haben Sie mit der Floppy 1551 bereits Pro¬ 
gramme geladen und auch wieder gespeichert und dabei die 
komfortablen Befehle DLOAD und DSAVE benutzt. 

Die Verwendung der Jokerzeichen (»?« und »*«) im Filena¬ 
men ist im Handbuch des Plus/4 ausführlich erklärt und 
dürfte keine Schwierigkeiten bereiten. Auch das Formatieren 
einer Diskette mit dem Befehl HEADER sollten Sie schon 
beherrschen, da ja, wie Sie im Handbuch nachlesen können, 
nur formatierte Disketten zum Laden und Speichern von Pro¬ 
grammen verwendet werden können. Das Handbuch des 
Plus/4 bezieht sich bei der Erklärung dieser Befehle zwar auf 
die Floppy 1541, doch können diese auch für die Floppy 
1551 ohne Einschränkungen benutzt werden. 

So können Sie mit HEADER eine Diskette formatieren. 
Dabei müssen Sie neben dem Namen, den die Diskette 
bekommen soll, auch eine ID angeben. Sie kann aus zwei 
beliebigen Zeichen bestehen und dient als Kennung, Mit ihr 
kann die Floppy 1551 erkennen, ob man die Diskette zwi¬ 
schendurch gewechselt hat. Damit sie das auch wirklich 
kann, sollte jede Ihrer Disketten eine eigene ID besitzen. Auf 
die ID folgt die Laufwerknummer, die bei dem Einzellaufwerk 
1551 immer Null ist, und die Gerätenummer, die, wie Sie aus 
dem Handbuch gelernt haben, immer mit 8 anzugeben ist. 
Jedes Peripheriegerät, zum Beispiel Ihre Floppy 1551 oder 
ein Drucker haben ihre eigene Gerätenummer, mit der sie der 
Computer anspricht. Sie kann als »Hausnummer« verstanden 
werden. Durch Angabe der Hausnummer weiß dann sofort 
das betreffende Gerät, daß der ankommende Befehl ihm gilt, 
und es wird aktiviert. Die »Hausnachbarn« bleiben davon 
jedoch unberührt. Im Normalfall ist die Gerätenummer der 
Floppystation 8, ein zweites Laufwerk wird eventuell mit der 
Nummer 9 angesprochen. Auf Wunsch kann man diese 
selbst verändern. Wie das geschieht, sollen Sie zu einem 
späteren Zeitpunkt erfahren. Bleiben wir aber zunächst bei 
einer Floppystation mit der Gerätenummer 8, die Sie nun 
durch diesen Bericht begleiten wird. 

Es könnte eine Formatierungsanweisung beispielsweise 
so aussehen: 

HEADER "ERSTE DISKETTE", IED, DO, U8 

Drücken Sie nun < RETURN >, so beginnt das Laufwerk 
zu arbeiten, was man an dem Aufleuchten der roten Leucht¬ 
diode bemerkt. Nach etwa 90 Sekunden ist der Vorgang 
abgeschlossen. Die rote Leuchtdiode sollte verlöschen und 
der Computer eine Statusmeldung bringen, die folgenderma¬ 
ßen aussieht: 

00,OK,00,00 

Sie besagt, daß die Diskette ordnungsgemäß formatiert 
wurde. Erscheint jedoch eine andere Meldung, während die 
rote Leuchtdiode blinkt, dürfte die Diskette nicht ganz in Ord¬ 
nung sein und sollte möglichst nicht zur Datenspeicherung 
verwendet werden. 

Das was Sie mit HEADER getan haben, können Sie der 
Floppystation auch direkter mitteilen, indem Sie den Weg 
über den Kommandokanal gehen. 

Neben dem Befehl zum Formatieren kennt die Floppy 1551 
noch einige andere Kommandos, die noch besprochen wer¬ 
den sollen. Diese müssen über einen bestimmten Kanal der 
Floppy mitgeteilt werden. Dafür dient der Kommandokanal. 
Bevor man jedoch Befehle senden kann, muß man wissen, 
wie dieser bedient wird. In der Regel geschieht dies durch 
folgende Punkte: 


- Öffnen des Kommandokanals mit OPEN, 

- Senden des Befehls mit PRINT # 

- eventuell Empfangen von Daten mit GET # oder INPUT # 

- Schließen des Kanals mit CLOSE 

Der OPEN-Befehl sieht allgemein so aus: 

OPEN File#, Geräte#, Kanal# 
wobei bedeuten: 

File#: logische Filenummer (1 bis 127) 

Geräte#: die Gerätenummer (für die 1551 in unserem Fall 
immer 8) 

Kanal#: Kanalnummer (0 bis 15) 

Der Syntax für PRINT # lautet: 

PRINT# File#, Datenl, Daten2, ... 
wobei bedeuten: 

File#: logische Filenummer (siehe OPEN) 

Daten: Zeichenketten, Variablen, Zahlen oder CHR$-Werte 
Für INPUT# und GET# gilt: 

INPUT# File#, Varl, Var2, ... 

GET# File#, Varl, Var2, ... 
wobei bedeuten: 

File#: logische Filenummer 

Var: Stringvariablen, die die einzulesenden Zeichenketten 
aufnehmen 

Schließlich noch die Syntax für CLOSE: 

CLOSE File# 
wobei bedeutet: 

File#: logische Filenummer 

Damit haben Sie das nötige Werkzeug, um den Kommando¬ 
kanal zu bedienen. Sie werden auch in Bezug auf die Daten¬ 
speicherung noch gebraucht. Tippt man nun 
OPEN 1,8,15 

wird der Kommandokanal (Kanalnummer 15) des Floppylauf- 
werkes mit der Gerätenummer 8 geöffnet und ist zur Befehls¬ 
auf nahm- bereit. 

Das Kommando, das die Floppy 1551 veranlaßt, eine Dis¬ 
kette zu formatieren, heißt NEW oder kurz N, hat aber nichts 
mit dem Basic-Befehl NEW zu tun. Unter Angabe des Disket¬ 
tennamens und der ID können Sie damit den Befehl zum For¬ 
matieren über den Kommandokanal senden. Dies geschieht 
mit folgender allgemeiner Anweisung: 

PRINT# 1, "NO:Disknaine,ID" 

Es bedeuten dabei: 

Diskname: Name, den die Diskette erhalten soll 
ID: die ID-Kennung, bestehend aus zwei beliebigen Zeichen 
Mit der CLOSE-Anweisung inaktivieren Sie den Komman¬ 
dokanal wieder, was nach jedem Zugriff geschehen sollte. 

CLOSE 1 

Eine Formatierung über dem Kommandokanal würde in 
unserem HEADER-Beispiel dann so aussehen: 

OPEN 1,8,15 

PRINT# 1, "NO:ERSTE DISKETTE,ED" 

CLOSE 1 

Hierbei entfällt aber die Ausgabe der komfortablen Status¬ 
meldung. 

Sollte beim Formatieren etwas schiefgehen, sei es durch 
eine fehlerhafte Diskette, stoppt der Laufwerkmotor und die 
rote Leuchtdiode beginnt rhythmisch zu flackern. Dies kann 
auch bei anderen Situationen passieren, wenn irgendwo ein 
Fehler unterlaufen ist. Ein Fehler kann aus verschiedenen 
Gründen entstehen. Deshalb hat die »intelligente« Floppy 
1551 auch eine Vielzahl von Fehlermeldungen parat, die im 
Falle eines Falles über den Kommandokanal gelesen werden 
können. Praktischerweise macht dies der C16 oder Plus/4 
für uns bereits automatisch über die reservierten Variablen 

DS und DS$. DS enthalt dabei die Fehlernummer und DS$ die 
komplette Fehlerbezeichnung. Ist alles in Ordnung, enthält 
DS den Wert Null und DS$ den uns schon bekannten String 
00,OK,00,00. 

Sollte ein Fehler aufgetreten sein, ist dies eine entspre- 
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chende Fehlermeldung. Welche es dabei gibt und was sie 
bedeuten, können Sie im Handbuch im Anhang nachschla¬ 
gen. Wer aus irgendwelchen Beweggründen die Fehlermel¬ 
dung direkt vom Kommandokanal lesen möchte, dem mögen 
diese Basic-Zeilen helfen: 

10 D$="" 

20 OPEN 1,8,15 

30 GET#1,A$:D$=D$+A$:IF ST< >64 THEN 30 
40 CLOSEI:PRINTD$ 

Neben dem NEW-Befehl gibt es noch eine Reihe anderer 
Anweisungen, die über den Kommandokanal geschickt wer¬ 
den müssen. Glücklicherweise werden diese auch vom Basic 
3.5 des C16 und Plus/4 unterstützt, so daß Sie die Komman¬ 
dos mit einfachen Basic-Befehlen ausführen lassen können. 

Auf diese Weise können ohne Probleme einmal gespei¬ 
cherte Programme mit SCRATCH gelöscht werden, wenn 
man sie nicht mehr benötigt. Die allgemeine Anweisung dafür 
lautet: 

SCRATCH "Filename", DLaufwerk# ON UGeräte# 

Laufwerk# ist dabei die Laufwerknummer und muß bei der 
Einzelfloppy 1551 immer mit O angegeben werden oder kann 
ganz entfallen. 

So löschen wir ein Programm namens »ALTES PRO¬ 
GRAMM« folgendermaßen: 

SCRATCH "ALTES PROGRAMM" ON U8 

Wenn, wie es normalerweise der Fall ist, die Gerätenummer 
der Floppystation 8 ist, kann auch die Angabe »ON U8« ent¬ 
fallen. Nach der Sicherheitsabfrage »ARE YOU SURE?«, 
beginnt die Floppystation das genannte Programm zu 
löschen. Ist die Arbeit getan, meldet sich der Computer mit 
der Statusmeldung 
01,FILES SCRATCHED,01,00 

Die Zahl hinter der Wortmeldung »01« zeigt dabei an, wie¬ 
viele Files gelöscht wurden. 

Den Befehl zum Löschen eines Programmes können wir 
auch von Hand über den Kommandokanal senden. Das Kom¬ 
mando heißt dazu ebenfalls SCRATCH oder als Abkürzung S. 
Nach dem schon bekannten Muster würde dies so ausse- 
hen: 

OPEN 1,8,15: PRINT#1,"SO:ALTES PROGRAMM": CLOSEI 

Besondere Vorsicht müssen Sie bei der Verwendung der 
Jokerzeichen (»?« und »*«) walten lassen, die ja im Filenamen 
verwendet werden dürfen. Man sollte vorher überprüfen, 
welche Files damit wirklich gelöscht werden, um böse Über¬ 
raschungen zu vermeiden. Sollte einmal ein Programm verse¬ 
hentlich gelöscht worden sein, so ist es nicht endgültig verlo¬ 
ren. Der SCRATCH-Befehl löscht nämlich nicht das gesamte 
Programm, sondern nur die Zeiger, die auf das Programm zei¬ 
gen und gibt die zuvor belegten Sektoren wieder frei. Als Ser¬ 
vice bietet die Demodiskette, die der 1551 beiliegt, ein Pro¬ 
gramm namens UNSCRATCH an, das den Löschvorgang wie¬ 
der rückgängig macht. Es ist zwar mit einigem Zeitaufwand 
verbunden, funktioniert jedoch hervorragend. 

Sollte Ihnen der Name eines gespeicherten Programmes 
nicht mehr gefallen, können Sie es mit dem Basic-Böfehl 
RENAME umbenennen: 

RENAME "alter Name" TO "neuer Name", DLaufViferk# 
ON UGeräte # 

Ein Beispiel hierfür wäre: 

RENAME "ALTES PROGRAMM" T0 "NEUES PROGRAMM" 

Dies bewirkt, daß das Programm »ALTES PROGRAMM« in 
»NEUES PROGRAMM« umgetauft wird. Das entsprechende 
Kommando, das über den Kommandokanal geschickt wird, 
hat den gleichen Namen und wird mit R abgekürzt. Nach 
schon bekanntem Muster sieht die Befehlsfolge hierfür so 
aus: 

OPEN 1,8,15: PRINT#1,"R0:NEUES PR0GRAMM=ALTES PRO¬ 
GRAMM": CL0SE 1 

Achten Sie aber darauf, daß hier der neue Name zuerst ste¬ 


hen muß. Die Jokerzeichen geben bei diesem Befehl keinen 
Sinn und sind deshalb in den Filenamen nicht gestattet. 

Neben dem Directory gibt es noch eine Besonderheit auf 
der Diskette, die auch mit dem Formatieren aufgebracht wird, 
die BAM. In der BAM (Block Availability Map) werden alle 
belegten und nicht belegten Blöcke als solche gekennzeich¬ 
net, um das Überschreiben von schon verwendeten Blöcken 
zu vermeiden. So kann es durch bestimmte Diskettenmani¬ 
pulationen oftmals zu »Müll« auf der Diskette kommen, sei es 
durch nicht geschlossene Files oder Blöcke, deren Inhalt zu 
keinem gespeicherten Programm mehr gehört. Um ein 
Durcheinander, was auch die Ladezeiten erheblich verlän¬ 
gern kann, zu vermeiden, gibt es den COLLECT-Befehl, der 
die Diskette wieder aufräumt. Dabei werden sämtliche offe¬ 
nen Files (im Directory mit »*« markiert) gelöscht und »her¬ 
renlose« Sektoren wieder freigegeben. In bestimmten Fällen 
ist also ein COLLECT-Befehl immer angebracht: 

COLLECT DLaufwerk# ON UGeräte# 

Für eine Floppystation mit der Gerätenummer 8 genügt 
also auch: 

COLLECT 

Will man diesen Befehl über den Kommandokanal senden, 
muß man VALIDATE oder abgekürzt V angeben, was wie folgt 
getan wird: 

OPEN 1,8,15: PRINT# 1, "V0": CL0SE 1 

Besitzt man ein Doppellaufwerk, ist es möglich, durch 
einen einfachen Befehl Files oder die gesamte Diskette in 
einem Laufwerk auf ein anderes Laufwerk zu kopieren. Man 
benutzt dazu die Basic-Anweisungen BACKUP und COPY. 
Ohne Doppellaufwerk ergeben diese Befehle für den Anwen¬ 
der jedoch keinen Sinn, weswegen sie auch nicht weiter 
behandelt werden sollen. Mit dem COPY-Befehl können 
lediglich einzelne Files unter einem neuen Namen wieder auf 
dies^i' a Diskette kopiert werden, indem man die Angabe der 
Laufwerknummern wegläßt: 

COPY "SOMMER" TO "WINTER" 

Damit würde das File »SOMMER« in ein neues File mit 
Namen »WINTER« kopiert. Selbstverständlich kann auch der 
COPY-Befehl direkt über den Kommandokanal geschickt 
werden: 

OPEN 1,8,15: PRINT#1,"C0:WINTER=S0MMER": CL0SE 1 

Der Name des neuen Files muß in diesem Fall aber am 
Anfang stehen. 

Sicherlich haben Sie schon bemerkt, daß jedesmal, wenn 
Sie eine Diskette in das Laufwerk schieben, dieses automa¬ 
tisch für ein paar Sekunden anläuft. Dabei wird die Magnet¬ 
scheibe der Diskette besser zentriert, was zu einer Scho¬ 
nung der Diskette beiträgt. 

Der nächste Befehl ist der Befehl I für das Initialisieren einer 
Diskette. Beim Initialisieren liest die Floppystation die aktuelle 
BAM der Diskette, wenn vorhanden, in ihren Speicher. Die 
BAM, wir erwähnten sie schon, ist für die Diskettenorganisa¬ 
tion sehr wichtig. Was die BAM genau darstellt, soll später 
geklärt werden. Sie ist von Diskette zu Diskette verschieden. 
So darf es unter keinen Umständen Vorkommen, daß beim 
Wechsel einer Diskette noch die BAM der zuvor eingelegten 
Diskette im Speicher steht. Der nächste Schreibzugriff auf 
die neue Diskette hätte fatale Folgen, wenn er unter der alten 
BAM geschehen würde. Um dies zu vermeiden, ist die Floppy 
1551 so »schlau« und initialisiert (liest die BAM) jede Diskette 
vor dem ersten Zugriff darauf. So dürften Sie den Befehl zum 
Initialisieren auch recht selten benötigen. Er ist deshalb nicht 
als Basic-Befehl implementiert, sondern muß im Falle eines 
Falles direkt über den Kommandokanal gesendet werden. 
Die Abkürzung hierfür lautet I für Initialisieren und wird folgen¬ 
dermaßen über den Kommandokanal geschickt: 

OPEN 1,8,15 
PRINT# 1, "10" 

CL0SE 1 
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Damit haben Sie sämtliche Befehle kennengelernt, die 
sozusagen für das Haushalten einer Diskette wichtig sind. 
Außer Programmen können jedoch auch andere Daten 
gespeichert werden. Das DOS stellt dafür mehrere verschie¬ 
dene Dateitypen bereit. 

Für die Floppy 1551 sind die Programme, die Sie bisher auf 
Disketten gespeichert haben, eigentlich nichts weiter als ein 
bestimmter Dateityp, der eben ein Programm beinhaltet und 
einfach mit LOAD, beziehungsweise DLOAD, gelesen und mit 
SAVE, beziehungsweise mit DSAVE, gespeichert werden 
kann. Wenn Sie sich das Directory einer Diskette betrachten, 
so werden Sie neben der Längenangabe und dem Programm¬ 
namen dahinter noch das Kürzel »PRG« finden. Es sagt aus, 
daß es sich hierbei um ein File des Typs »PRoGramm« han¬ 
delt. Es gibt aber noch andere Filetypen, auf die wir gleich 
eingehen werden. 

Sequentielle Datenspeicherung 


Die Behandlung von großen Datenmengen stellt für den Pro¬ 
grammierer oft ein Problem dar, da irgendwann der Speicher¬ 
platz seines Computers nicht mehr ausreicht. Bei Adreßver- 
waltungen, die sich durch neue Adressen ständig erweitern, 
kann dies beispielsweise schnell geschehen. Außerdem 
möchte man vielleicht die eingegebenen Daten bei Beendi¬ 
gung seines Programmes nicht verlieren. Man braucht also 
eine Möglichkeit, selbst umfangreiche Daten dauerhaft und 
schnell speichern zu können. Dazu bietet sich die sequen¬ 
tielle Datenspeicherung der Floppy 1551 geradezu an. Sie ist 
die einfachste, und deshalb auch für Einsteiger die am 
schnellsten erlernbare Art, Daten auf der Diskette abzulegen. 
Sie ist aber nicht gerade die schnellste. Prinzipiell ist sie der 
Programmspeicherung sehr ähnlich, da auch Programmda¬ 
ten sequentiell, das heißt der Reihe nach, auf die Diskette 
geschrieben und ebenso wieder gelesen werden. 

Zur Anwendung einer sequentiellen Datei benötigen wir 
wieder die Basic-Befehle, die wir schon bei der Behandlung 
des Kommandokanals kennengelernt haben. Sie werden 
auch ähnlich verwendet. So wird eine sequentielle, wie auch 
jede andere Datei, mit OPEN eröffnet, wobei noch einige wei¬ 
tere Angaben gemacht werden müssen. Allgemein lautet die 
Syntax zur Eröffnung einer Datei wie folgt: 

OPEN File#, Geräte#, Kanal#, "Filename, Filetyp, Be¬ 
triebsart * 
wobei bedeuten: 

File #: logische Filenummer (1-127) 

Geräte #: Gerätenummer (bei Floppy normalerweise 8) 
Kanal # Kanalnummer (nur 2-14) 


Filename: der Name des Files (wie bei Programmfiles maxi¬ 
mal 16 Zeichen) 

Filetyp: Art des Files. Es gibt: 

P als Kürzel für PRG-Files 
S als Kürzel für SEQ-Files 
U als Kürzel für USR-Files 
L als Kürzel für REL-Files 

Betriebsart: Modus, in dem die Datei geöffnet werden soll: 
R zum Lesen 
W zum Schreiben 
A zum Anhängen von Daten 

Damit können wir schon eine sequentielle Datei eröffnen. 
Sie werden sich vielleicht die Frage gestellt haben, was die 
logische Filenummer bedeutet, die wir auch schon bei der 
Eröffnung des Kommandokanals angeben mußten. Dies ist 
schnell erklärt. Der Computer erlaubt es, mehrere Dateien 
gleichzeitig offenzuhalten (bis zu 10). Um eindeutig auf eine 
bestimmte dieser Dateien zugreifen zu können und um Ver¬ 
wechslungen zu vermeiden, bekommt jede eröffnete Datei 
eine Nummer, unter der wir sie ansprechen können. Der 
Computer bietet uns dabei 128 verschiedene Nummern an, 
von denen wir beliebige wählen können. Man darf zwei 
gleichzeitig eröffneten Dateien natürlich dabei nie die gleiche 
Nummer zuordnen, da sich sonst der Computer beschwert. 

Auch die Kanalnummer ist bei sequentiellen Dateien von 2 
bis 14 frei wählbar. Was sie jedoch bedeutet, ist an dieser 
Stelle nicht wichtig und wird zu einem späteren Zeitpunkt 
erklärt. Eröffnen wir lieber einmal eine sequentielle Datei mit 
dem Namen »ERSTE DATEI«: 

OPEN 1,8,2,"ERSTE DATEI,S,W" 

Wie Sie erkennen können, ist die Datei zum Schreiben (W) 
eröffnet worden. Mit dem PRINT #-Befehl ist dies möglich. 
So kann man beispielsweise folgenden String in der Datei 
ableger- 

PRINT#1, "DAS SIND DIE ERSTEN DATEN" 

Wichtig ist dann, seine Datei auch wieder zu schließen, was 
mit dem CLOSE-Befehl geschieht. In unserem Beispiel müß¬ 
ten wir demnach tippen: 

CLOSE 1 

Sollte man einmal vergessen, eine Datei zu schließen, wird 
diese für die Floppystation als nicht ordnungsgemäß abge¬ 
schlossen betrachtet und ist ungültig. Im Directory erkennt 
man solche Files auch an dem Sternchen (*) vor der Bezeich¬ 
nung des Filetyps. In der Regel kann man solche Files nicht 
mehr lesen, womit die Daten selbstverständlich verloren 
sind. Nur mit einigem programmiertechnischen Aufwand 
kann man seine Daten retten, was im Rahmen dieses Berichts 
jedoch nicht vorgeführt werden soll. Schließen Sie Ihre Files 
deshalb immer sorgfältig. 
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Ein sequentielles File ist im Directory mit dem Kürzel »SEQ« 
gekennzeichnet und nur als solches verwendbar. Wollen Sie 
die Daten Ihrer Datei wieder einiesen, so müssen Sie sie wie¬ 
der öffnen. Dieses Mal muß für die Betriebsart das Kürzel R 
für Lesen geschrieben werden, da die Daten gelesen werden 
sollen: 

OPEN 1,8,2,"ERSTE DATEI,S,R" 

Jetzt können Sie den vorher geschriebenen String mit 
INPUT # wieder einiesen. 

INPUT #1,A$: PRINT A$ 

Auf dem Bildschirm erscheint der Ihnen bekannte Satz. 
Vergessen Sie nicht die Datei wieder zu schließen: 

CLOSE 1 

Der Nachteil einer sequentiellen Datei ist, daß entweder 
nur von Anfang an gelesen oder geschrieben werden kann, 
öffnen Sie die Datei ein zweites Mal zum Schreiben, würden 
aus diesem Grund die bereits abgelegten Daten von den 
neuen Daten überschrieben werden. Um jedoch gefahrlos 
neue Daten anhängen zu können, gibt es die Append- 
Betriebsart, die mit dem Kürzel A aktiviert wird. Damit können 
Sie Ihre Datei ein zweites Mal öffnen, um weitere Daten dran¬ 
zuhängen, wie dies in den folgenden Basic-Zeilen geschieht: 
OPEN 1,8,2,"ERSTE DATEI,S,A": PRINT#1,"DIES SIND 
WEITERE DATEN": CLOSE 1 

Wenn Sie die Datei nun wieder zum Lesen öffnen, können 
Sie beide Datenstrings mit INPUT # lesen. Da jetzt aber zwei 
Datenstrings vorhanden sind, benötigt man auch zwei 
INPUT ^-Befehle. Wenn Sie irgendwelche Daten mit 
PRINT # gespeichert haben, so wird immer nach jedem 
abgeschlossenen PRINT#-Befehl zusätzlich ein CHR$(13) 
(das Zeichen für die RETURN-Taste) mit in die Datei geschrie¬ 
ben. Dies entspricht genau der Funktionsweise von PRINT 
auf dem Bildschirm. INPUT # liest nun immer alle Zeichen bis 
zum nächsten CHR$(13) (RETURN-Zeichen oder Carriage- 
Return) in die Variable, das heißt in unserem Fall bis zum Ende 
des zuerst gespeicherten Strings »DAS SIND DIE ERSTEN 
DATEN«. Ein weiterer INPUT#-Befehl liest dann ab dort bis 
zum nächsten CHR$(13), was in unserem Beispiel der eben 
angehängte String wäre. 

Es ist aber auch möglich, das RETURN-Zeichen beim 
Schreiben zu unterdrücken, wenn man vielleicht eine durch¬ 
gehende Zeichenkette auf der Diskette speichern möchte. 
Analog zum normalen PRINT auf dem Bildschirm, kann ein 
Carriage-Return durch ein Semikolon hinter der 
PRINT ^-Anweisung verhindert werden. So würden folgende 
Datenstrings ohne Unterbrechung durch CHR$(13) in der 
Datei abgelegt werden: 

PRINT #1, "DIE BEIDEN STRINGS 
PRINT# 1, "SIND NICHT GETRENNT" 

Würde man nun diese beiden Daten wieder von Diskette 
lesen wollen, könnte man dies mit nur einem INPUT # 
geschehen lassen, da er ja immer bis zum nächsten Carriage- 
Return liest. Mit 
INPUT# 1, A$ 

würde, vorausgesetzt, daß Sie das File zuvor geschlossen 
und zum Lesen wieder geöffnet haben, folgender Inhalt in die 
Variable A$ lesen: »DIE BEIDEN STRINGS SIND NICHT 
GETRENNT«. 

Wird eine so erzeugte Zeichenkette jedoch zu lang (über 
88 Zeichen), so würde dies einen Fehler zur Folge haben, 
wenn man sie mit INPUT # einiesen wollte. Der Computer 
beschwert sich dann mit einem »STRING TOO LONG 
ERROR« und bricht die Übertragung ab. Um dies zu umge¬ 
hen, kann man auch jedes Zeichen einzeln einiesen. Dies ist 
analog zu GET mitGET# zu bewerkstelligen. In dem kleinen 
Programm am Anfang, das die Statusmeldung vom Komman¬ 
dokanal liest, wurde diese Methode schon einmal angewen¬ 
det. Dabei liest das Programm so lange, bis die Statusvariable 
ST meldet, daß keine Informationen mehr gesendet werden. 


Auch hier kann man das Ende eines Datenstrings zum Bei¬ 
spiel durch Abfrage, ob ein Carriage-Return gelesen wurde, 
vornehmen. Dabei sind dem Programmierer keine Grenzen 
gesetzt (höchstens in bezug auf die Kapazität einer Dis¬ 
kette). 

Wenn Sie die Syntax des OPEN-Befehls zum öffnen einer 
Datei aufmerksam gelesen haben, sollte Ihnen aufgefallen 
sein, daß es auch für Programmdateien ein Filetyp-Kürzel 
gibt (P). Dadurch dürfte Ihnen vielleicht auch schon der 
Gedanke gekommen sein, daß auch Programmfiles nach glei¬ 
chem Muster wie sequentielle Files, bearbeitet werden kön¬ 
nen. Probieren Sie es doch einmal aus. Es funktioniert wirk¬ 
lich. 

User-Files 


Jetzt kommen wir zum dritten Datentyp, dem User-File (Kür¬ 
zel U). Dazu gibt es jedoch nicht allzuviel zu sagen, da es auf 
die gleiche Weise wie ein SEQ-File behandelt werden kann. 

Wenn Sie einen Drucker besitzen, haben Sie sicher schon 
einmal den CMD-(Command)-Befehl verwendet, um bei¬ 
spielsweise Ihr Basic-Listing auf dem Drucker auszugeben. 
Dazu tippten Sie wohl folgendes: 

0PEN4,4: CMD4: LIST 

Dabei haben Sie gelernt, daß der CMD-Befehl die gesamte 
Bildschirmausgabe auf das entsprechende Peripheriegerät 
umlenkt. Sie können damit aber Ihr Listing nicht nur auf dem 
Drucker ausgeben, sondern auch auf ein File auf der Diskette 
lenken, wie zum Beispiel in ein SEQ-File: 

10 OPEN 1,8,2, "PROGRAMM,S,W" 

20 CMD 1 
30 LIST 

Damit ' 3Tet sich dieses kleine Programm selbst in das 
SEQ-File mit dem Namen »PROGRAMM«. Tippen Sie danach 
noch 

CLOSE 1 

ist das File ordnungsgemäß geschlossen. Wie Sie sehen, 
läßt sich mit den Filetypen, die Sie jetzt kennengelernt haben, 
einiges anfangen. Nachteilig ist dabei jedoch, daß diese Files 
nur von Anfang an und immer der Reihe nach gelesen werden 
können. Das Suchen nach bestimmten Daten oder gar das 
Einfügen solcher ist nur mit einigem Programmieraufwand zu 
bewältigen. Doch gibt es eine weitere Art, Daten auf Diskette 
abzulegen, die einen anderen Weg beschreitet, aber auch 
etwas anders zu handhaben ist. 

Die relative 
Datenspeicherung 


Relative Dateien sind eigentlich die schnellste Art der Daten¬ 
speicherung, wenn es um das Suchen von bestimmten Daten 
geht. Während die sequentielle Datei, um mit ihr arbeiten zu 
können, im Speicher des Computers geladen werden muß, 
ist dies bei der relativen Datei nicht notwendig. Deshalb kann 
sie auch wesentlich größer sein. Die Grenze setzt die Kapazi¬ 
tät der Diskette. Durch eine besondere Anordnung der Daten 
auf der Diskette ist es möglich, auf bestimmte Elemente 
schnell zugreifen zu können. Dafür muß man jedoch eine Ein¬ 
schränkung in Kauf nehmen. 

Bei der relativen Datei dürfen alle Datenelemente maximal 
nur eine vorher festgelegte Länge besitzen. Jeder dieser 
Datensätze dieser Länge wird nun durchnumeriert. Durch 
Angabe der Nummer des gesuchten Datensatzes können 
Sie damit sehr schnell darauf zugreifen. Das Anlegen einer 
solchen Datei geht aber etwas komplizierter vonstatten: 

- Öffnen der Datei in der bekannten Form 
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- Freigeben des letzten Datensatzes und 

- Schließen der Datei. 

Nach diesem Muster wollen wir jetzt verfahren. Eröffnen 
wir also eine relative Datei: 

OPEN 1,8,2,"RELATIVES FILE,L,"+CHR$(50) 

Neu dabei ist, daß statt des Betriebsmodus die Datensatz¬ 
länge in Form eines CHR$-Codes angegeben werden muß, 
die in unserem Fall 50 Zeichen beträgt. Dabei ist aber das 
Carriage-Return-Zeichen, das am Ende eines PRINT#-Be- 
fehls mitgesendet wird, mit eingeschlossen. Effektiv haben 
Sie bei der obigen Angabe also nur 49 Zeichen frei zur Verfü¬ 
gung. Wenn Sie die Syntax des CHR$-Befehls kennen, 
sehen Sie auch sofort die maximale Länge (255 Zeichen), die 
die Datensätze in einem relativen File haben dürfen. Ein grö¬ 
ßerer Wert ist als Angabe bei CHR$ nämlich nicht möglich. 

Ein Datensatz darf immer erst verwendet werden, wenn er 
freigegeben ist. Unter Freigeben versteht man das Voll¬ 
schreiben dieses Satzes mit $FF, das heißt mit CHR$(255)- 
Bytes. Erst dann kann er mit anderweitigen Daten gefüllt wer¬ 
den. Die Besonderheit ist, daß beim Freigeben eines Daten¬ 
satzes auch alle anderen, noch nicht beschriebenen Daten¬ 
sätze mit niedrigeren Nummern freigegeben werden. Da das 
Freigeben von Datensätzen sehr zeitintensiv ist (man 
bedenke, daß alle Datensätze mit $FF belegt werden), sollte 
man gleich beim Anlegen der Datei alle Sätze durch Beschrei¬ 
ben des letzten Datensatzes freigeben. Dies geschieht mit 
dem Kommando P. Es wird, wie alle Diskettenbefehle, über 
den Kommandokanal geschickt und hat folgende Syntax: 

PRINT# File#, "P" CHR$(Kanal#) CHRS(LoNr) 
CHRS(HiNr) CHR$(Stelle) 
wobei bedeuten: 

File#: logische Filenummer 

Kanal#: die Kanalnummer der eröffneten relativen Datei 
(2-14) 

LoNr: niederwertiges Byte der Datensatznummer 
HiNr: höherwertiges Byte der Datensatznummer 
Stelle: Nummer des Zeichens im Datensatz, auf das positio¬ 
niert wird 

Unbekannt dürften hierbei die Parameter LoNr und HiNr 
sein. Sie sind das jeweils nieder- und höherwertige Byte der 
gewünschten Datensatznummer, auf die positioniert werden 
soll. Da ein CHR$-Befehl nur Werte bis 255 aufnehmen kann, 
wir aber ohne weiteres relative Dateien mit 500 Datensätzen 
haben können, muß die Nummer mit zwei CHR$-Anweisun- 
gen übergeben werden. Sie können die beiden Parameter 
aus folgenden Formeln berechnen: 

HiNr = INT(Datensatznummer/256) 

LoNr = Datensatznummer - HiNr*256 

Bereiten wir nun eine Datei mit 300 Datensätzen vor. Dies 
senden wir mit dem P-Befehl über den Kommandokanal. Die 
beiden Parameter HiNr und LoNr berechnen wir mit den obi¬ 
gen Formeln: 

HiNr = INT(300/256) = 1 
LoNr = 300 - 1 *256 = 44 

OPEN 2,8,15 

PRINT#2,"P" CHR$(2) CHR$(44) CHR$(1) CHR$(1) 

PRINT# 1,CHR$(255) 

CLOSE 1: CLOSE 2 

Beachten Sie, daß zwar über den Kommandokanal positio¬ 
niert wird, die Daten aber über den eröffneten Kanal unserer 
eigentlichen relativen Datei geschickt werden. So auch das 
CHR$(255)-Zeichen zum Freigeben. 

Bis sich Ihr C16 oder Plus/4 nun wieder meldet, kann 
schon einige Zeit vergehen, insbesondere wenn sehr viele 
Datensätze freigegeben werden müssen. Stören Sie sich 
auch nicht an dem eventuellen Fehlerblinken der roten LED 
an Ihrem Laufwerk. Dies ist völlig normal. Nach dem Freigabe¬ 
vorgang und dem Schließen der Datei können Daten in die 
verschiedenen Datensätze geschrieben werden. Das funk¬ 


tioniert nach dem gleichen Schema, wie Sie es von der 
sequentiellen Datei her kennen, einfach mit PRINT #. Ver¬ 
gessen Sie aber nicht, vorher mit P an die gewünschte Stelle 
zu positionieren. Hier ein Beispiel: 

10 OPEN 1,8,2,"RELATIVES FILE,L,"+CHR$(50) 

20 OPEN 2,8,15 

30 PRINT#2, "P" CHR$(2) CHR$(200) CHR$(0) CHR$(1) 

40 PRINT#1,"DER DATENSATZ 200 WIRD BESCHRIEBEN" 

50 CLOSE 1: CLOSE 2 

In diesem Fall wird der Text »Der Datensatz 200 wird 
beschrieben« dem 200. Datensatz zugeordnet. Wenn Sie 
nicht mehr auf die Datei zugreifen wollen, schließen Sie diese 
und den Kommandokanal wieder. 

Das Lesen der Daten erfolgt analog zum Schreiben. Sie 
können dabei INPUT # oder GET # je nach Belieben verwen¬ 
den (INPUT# jedoch nur bis 88 Zeichen Länge!): 

100 OPEN 1,8,2,"RELATIVES FILE,L,"+CHR$(50) 

110 OPEN 2,8,15 

120 PRINT#2,"P" CHR$(2) CHR$(200) CHR$(0) CHR$(l) 
130 INPUT# 1,A$ 

140 PRINT A$ 

150 CLOSE 1:CLOSE 2 

Im Gegensatz zur sequentiellen Datei muß ein relatives File 
zum Schreiben oder Lesen nicht immer erst geschlossen und 
dann wieder geöffnet werden. Haben Sie ein relatives File 
einmal eröffnet, können Sie wechselweise nach Belieben 
schreiben oder lesen. Vergessen Sie aber das Positionieren 
nicht, um nicht ungewollt einen Datensatz zu überschreiben. 

Der Direktzugriff auf die Floppy 1551 


Bevor wir uns an die Direktzugriffsbefehle heranwagen, müs¬ 
sen wl- noch einmal zum Formatieren einer Diskette zurück¬ 
kehren. 

Um eine gewisse Ordnung auf der Diskette zu halten und 
um die geschriebenen Daten auch wiederfinden zu können, 
muß eine Diskette vor Verwendung formatiert werden. Dabei 
teilt die Floppy 1551 die Magnetscheibe, die sich in der Dis¬ 
kettenhülle wie eine Schallplatte dreht, in mehrere konzentri¬ 
sche Spuren auf. Diese werden auch Tracks genannt und von 
außen nach innen von 1 bis 35 durchnumeriert. Jeden dieser 
Tracks unterteilt die Floppy 1551 in noch kleinere Teile, die 
Sektoren, von denen je nach Position des Tracks auf der Mag¬ 
netscheibe, 17 bis 21 angelegt werden. Auch diese bekom¬ 
men auf jeder Spur eine aufsteigende Numerierung. In jedem 
Sektor haben 255 Byte Platz, was man auch als Block 
bezeichnet. Auf der gesamten Spur 18 wird schließlich noch 
das Ihnen schon bekannte Directory und die BAM (Block 
Availability Map) angelegt, und ist demnach nicht zur Daten¬ 
speicherung verwendbar. Das Directory enthält neben den 
Filenamen, den Filetypen und deren Länge in Blöcken auch 
noch Bezugsdaten, die angeben, in welchen Sektoren die 
Files beginnen, um sie bei einem Zugriff schnell zu finden. Die 
BAM ist quasi der Verwalter der freien und schon belegten 
Sektoren. Wenn ein Sektor (Block) in dieser als belegt 
gekennzeichnet ist, wird er normalerweise vom DOS nicht 
mehr überschrieben. 

Mit den Direktzugriffsbefehlen bekommen Sie nun die 
Möglichkeit in die Hand, jeden dieser Sektoren einzeln zu 
manipulieren, was zum Beispiel Grundlage von Kopierpro¬ 
grammen ist. 

Um diese Befehle verwenden zu können, muß zunächst ein 
besonderer Kanal geöffnet werden, der Direktzugriffskanal. 
Man tut das mit dem universellen Basic-Befehl OPEN nach 
bewährtem Muster: 

OPEN File#, Geräte#, Kanal#, " # " 

Die Parameter dürften inzwischen schon bekannt sein, mit 
Ausnahme des Filenamens, der jetzt nur aus einem einzigen 
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Zeichen besteht (#). Das ist das Zeichen, das besagt, daß 
der eröffnete Kanal ein Direktzugriffskanal ist. Dabei reser¬ 
viert die Floppy 1551 für den Benutzer einen bestimmten 
Speicherbereich in ihrem RAM. Man nennt ihn Pufferspei¬ 
cher oder auch nur Puffer. Ein Puffer in der Floppystation ist 
ein Teil des Speichers, in dem das Laufwerk bestimmte Daten 
ablegt oder Blöcke zwischenspeichert, um sie zu bearbeiten. 
Die Floppy 1551 hat fünf solcher Puffer, von denen sie einige 
ständig benötigt. Durch das # -Zeichen sucht die Floppysta¬ 
tion einen freien Puffer aus, auf den sich der Direktzugriff in 
Zukunft beziehen wird. Wer daran interessiert ist, welcher der 
fünf Puffer reserviert wurde, kann dies unmittelbar nach dem 
Öffnen des Direktzugriffskanals über den Kommandokanal 
erfahren. Kommen wir jetzt zu den eigentlichen Befehlen, die, 
wie auch alle bisherigen Floppybefehle, über den Komman¬ 
dokanal laufen. 

Der Block-Reud-Befehl 


Mit diesem Befehl ist es möglich, einen beliebigen Block von 
der Diskette in den reservierten Puffer zu lesen. Eigentlich 
nennt sich der Befehl B-R; er enthält jedoch einen Fehler im 
Betriebssystem. Als Alternative bietet das DOS einen User- 
Befehl, der die gleichen Funktionen ausführt, dies aber feh¬ 
lerfrei tut. Daß der Fehler des B-R-Befehls in der Floppy 1551 
noch nicht behoben zu sein scheint, läßt sich daraus schlie¬ 
ßen, daß im Handbuch unter Block-Read nur der User-Befehl 
beschrieben wird. Er heißt Ul und hat folgende Syntax: 

Ul Kanal# Laufwerk# Track# Sektor# 

Track# und Sektor# sind dabei die Nummer des 
gewünschten Tracks und Sektors, der gelesen werden soll. 
Die Daten können dann mit GET # aus dem Puffer gelesen 
werden. 

Ein Beispiel, das aus dem Buch »Die Floppy 1541« des 
Markt & Technik Verlags entnommen ist, funktioniert auch auf 
der Floppy 1551: 

10 OPEN 1,8,2,"#" 

20 OPEN 2,8,15 

30 PRINT#2, "Ul";2;0;18;0 

40 GET #1, A$, B$ 

50 PRINT ASC(A$), ASC(B$) 

Es liest die zwei ersten Zeichen des Sektors 0 auf Spur 18. 
Achten Sie aber darauf, daß beim Einlesen mit GET # ein 
gesendetes Nullbyte (CHR$(0)-Zeichen) als Leerstring über¬ 
geben wird (""). Eine Ausgabe mit ASC bringt dabei eine 
Fehlermeldung. Man kann dieses Problem folgendermaßen 
umgehen: 

PRINT ASC(A$+CHR$(0)) 

Will man nur ein bestimmtes Byte des Puffers mit GET # 
auslesen, so kann man angeben, ab welchem Byte der Puffer 
gelesen werden soll. Dies geschieht mit dem Block-Pointer- 
Befehl: 

B-P Kanal # Position # 

Position # ist dabei die Nummer des Bytes, ab dem gelesen 
werden soll (0 bis 255). 


Der Block-Write-Befehl 


Will man den Inhalt eines Puffers auf der Diskette ablegen, 
benutzt man den Block-Write-Befehl. Normalerweise heißt er 
B-W, enthält aber ebenfalls einige Mängel. Aus diesem Grund 
gibt es auch dazu eine Alternative, den U2-Befehl; 

U2 Kanal# Laufwerk# Track# Sektor# 

Er schreibt als Gegenstück zum Ul-Befehl den Pufferinhalt 
des Floppyspeichers in einen gewünschten Block auf die 
Diskette zurück, wie zum Beispiel bei diesem kleinen Pro¬ 


gramm, das den String »EIN BLOCK WIRD BESCHRIEBEN« 
in Sektor 5 auf Spur 5 schreibt: 

10 OPEN 1,8,2,"#" 

20 OPEN 2,8,15 

30 PRINT#1,"EIN BLOCK WIRD BESCHRIEBEN" 

40 PRINT#2, "U2";2;0;5;5 
50 CL0SE 1:CL0SE 2 

Haben Sie einen Block auf diese Weise direkt beschrieben, 
müssen Sie anschließend in der BAM auf der Diskette ver¬ 
merken, daß dieser Block belegt ist und nicht überschrieben 
werden darf. Dies geschieht mit dem Befehl Block-Allocate: 

B-A Laufwerk# Track# Sektor# 

Sollten Sie einen Block für belegt erklären wollen, der 
schon belegt war, kommt über den Kommandokanal die Mel¬ 
dung »NO BLOCK« und die Nummer des nächsten freien 
Blockes. Für belegt erklärte Blöcke werden bei einem Nor¬ 
malzugriff, wie zum Beispiel DSAVE, nicht überschrieben. 

Wenden Sie jedoch bei Disketten, die direktgeschriebene 
Blöcke enthalten, nie den COLLECT-Befehl an, da dadurch 
Ihre Blöcke in der BAM wieder freigegeben werden. Ein 
erneuter Schreibzugriff auf eine solche Diskette hätte 
zwangsläufig fatale Folgen. 

Wollen Sie einen Block wieder freigeben, da Sie ihn nicht 
mehr benötigen, verwenden Sie den Block-Free-Befehl: 

B-F Laufwerk# Track# Sektor# 

Er wird analog zu Block-Allocate angewandt und kenn¬ 
zeichnet einen Sektor in der BAM als nicht mehr belegt, so 
daß dieser bei weiteren Schreibzugriffen auf die Diskette wie¬ 
der überschrieben werden kann. 


POKE, PEEK und SYS für die 1551 

Dnun®»»< 

Mit den nächsten Befehlen steigen wir bereits auf die Ebene 
der Maschinensprache herab. Mit ihnen befinden wir uns 
bereits auf niedrigster Ebene und können direkt in die 
Arbeitsweise des DOS eingreifen. 

Der Memory-Read- oder M-R-Befehl ist quasi der PEEK- 
Befehl der Floppy 1551. Mit ihm können Sie sämtliche Spei¬ 
cherstellen der Floppystation auslesen, das heißt auch das 
DOS. Er funktioniert nach folgender Syntax: 

"M-R" CHR$(LoAdr) CHR$(HiAdr) CHR$(Anzahl) 

HiAdr und LoAdr sind hierbei das höher- und das nieder¬ 
wertige Byte der Adresse, ab der man lesen möchte. Sie las¬ 
sen sich nach den Formeln berechnen, wie wir sie auch 
schon bei der Aufspaltung der Datensatznummer bei relati¬ 
ven Files verwendet haben. Anzahl gibt an, wieviele Bytes 
gelesen werden (bis 255). Die Bytes werden dabei über den 
Kommandokanal geschickt und können einfach mit GET # 
gelesen werden. Man benötigt also keinen Direktzugriffska¬ 
nal. 

Lesen wir beispielsweise einmal die Speicherstelle 119 
aus, die die Gerätenummer der Floppy 1551 plus 32 enthält. 
Folgendes kleines Programm macht dies möglich: 

10 OPEN 1,8,15 

20 PRINT#1,"M-R" CHR$(119) CHR$(0) CHR$(l) 

30 GET#1, A$ 

40 PRINT "DIE GERAETENUMMER IST:" 

ASC(A$+CHR$(0))-32 
50 CL0SE 1 

Selbstverständlich kann man, sofern es sich um einen 
RAM-Bereich handelt, den Speicher der Floppy 1551 auch 
beschreiben. Dazu verwendet man den Memory-Write-oder 
M-W-Befehl, der, als Umkehrung zu M-R, den POKE-Befehl 
der Floppystation darstellt. Er hat eine dem M-R sehr ähnliche 
Syntax: 

"M-W" CHR$(LoAdr) CHR$(HiAdr) CHR$(Anzahl) 
CHR$(Byte1) CHR$(Byte2) .... 
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Der Wert Anzahl gibt dieses Mal die Anzahl Bytes an, die 
geschrieben werden. Bytel und Byte2 stellen dabei die ent¬ 
sprechenden Bytes dar, die in den Speicher der Floppysta- 
tion gePOKEt werden sollen. 

Auf diese Weise können Sie eigene Maschinenprogramme 
in den Speicher der Floppy 1551 bringen und dann mit dem 
Memory-Execute-Befehl starten. 

Diesen Befehl können Sie mit der SYS-Anweisung Ihres 
C16 oder Plus/4 vergleichen. Er ermöglicht es, Maschinen¬ 
programme in der Floppystation ab einer bestimmten 
Adresse ablaufen zu lassen. Auch hier geben wir Ihnen die 
Syntax an: 

"M-E" CHRS(LoAdr) CHRS(HiAdr) 

Als Einsteiger sollte man damit jedoch sehr vorsichtig sein, 
um Abstürze der Floppy 1551 zu vermeiden. Wir hören an 
dieser Stelle mit unserer Exkursion in die Tiefen der Floppy 
1551 auf. Interessant dürften lediglich noch folgende 
Befehle sein: 

0PEN1,8,15 
PRINT # 1, "U: " 

CLOSE 1 

Mit dem User-Befehl U: lösen Sie bei der Floppystation 
einen Reset aus, was bedeutet, daß sich die Floppy 1551 
damit wieder in den Einschaltzustand bringt. 

Außerdem läßt sich die Gerätenummer der Floppy 1551 
durch einen einfachen Befehl auf den Wert 9 ändern. Für 
Besitzer von zwei Floppystationen ist dies interessant, da 
man die zweite Floppystation auf eine andere Gerätenummer 
umstellen muß. Dies geschieht softwaremäßig bei der Floppy 
1551 so: 

OPEN 1,8,15 
PRINT# 1, "%9" 

CLOSE 1 

Nach Ablauf dieser Befehle können Sie Ihre Floppystation 


nur noch unter der Gerätenummer 9 ansprechen. Das hält 
jedoch nicht für immer. Wenn Sie die Floppy 1551 aus- und 
wieder einschalten oder einen Reset auslösen, ist die Gerä¬ 
tenummer wieder 8. 

Um dies zu vermeiden, kann man seine Floppystation auch 
hardwaremäßig auf eine andere Nummer einstellen. Im Hand¬ 
buch wird zwar eine Anleitung dazu gegeben, die aber völlig 
nutzlos ist, da man ohne Bild die Stelle auf der Platine der 
Floppy 1551 wohl nicht findet und womöglich wichtige Lei¬ 
tungen kappt. Angesichts dieser Tatsache soll abschließend 
der genaue Vorgang dieser Prozedur erklärt werden. Beden¬ 
ken Sie aber, daß beim öffnen des Gehäusedeckels die 
Garantie verlischt. Der Deckel ist durch vier Schrauben an der 
Unterseite der Floppystation befestigt. Nachdem Sie sie 
gelöst haben (Achtung! Vorher Netzstecker ziehen!), können 
Sie den Deckel abheben, und die Floppy 1551 offenbart ihr 
Innerstes, das wie in Bild 1 aussehen sollte. Durch das Auf¬ 
trennen der Lötbrücke in der Mitte der Platine (JP1) kann man 
die Geräteadresse der Floppy 1551 auf 9 umstellen. Es emp¬ 
fiehlt sich, einen Schalter einzulöten. So kann in Zukunft ohne 
weiteren Eingriff bequem zwischen 8 und 9 umgeschaltet 
werden. 

Damit ist der für diesen Bericht zur Verfügung stehende 
Platz erschöpft, die Geheimnisse der Floppy 1551 sind 
jedoch nicht einmal zur Hälfte gelüftet. Wer sich insbeson¬ 
dere für die professionelle Programmierung der Floppy 1551 
interessiert, der muß zur Zeit leider enttäuscht werden, da es 
noch kein Buch gibt, das die Floppy 1551 zum Thema hat. Es 
gibt jedoch einschlägige Literatur zur Floppy 1541, die im 
großen und ganzen auch für die Floppy 1551 verwendbar ist. 
Vielleicht war dieser Bericht ein kleiner Ansporn für diejeni¬ 
gen, die Geschmack an ihrem Laufwerk gefunden haben, und 
weiter in das Innenleben der Floppy 1551 vorstoßen wollen. 
Un^» (Michael Thomas/ks) 
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Der TEDv 

Multifunktionsbaustein des 
C16, C116 und Plus/4 



V ergleicht man die Platinen des C16 mit denen des C 64, 
stellt man fest, daß sich die Anzahl der Bauteile fast um 
die Hälfte verringert hat. Mitverantwortlich dafür ist der 
TED-Baustein (7360) des C16, C116 und Plus/4. Er über¬ 
nimmt die Aufgaben, die beim C 64 von je einem IC übernom¬ 
men wurden. Der TED ist für Speicherverwaltung, Bild¬ 
schirmaufbau, Tastatur- und Joystickabfrage, Grafik, Sound 
und Hardware-Interrupts verantwortlich. 

TED ist die Abkürzung für TExt Display. Der TED besitzt 
insgesamt 34 Register, die wie normale RAM-Adressen 
behandelt werden können. Die Register befinden sich in den 
Bereichen $FF00 bis SFF1F (65280 bis 65311) und $FF3E 
bis $FF3F (65342 bis 65343). Diese Adressen können 
sowohl gelesen als auch beschrieben werden. Zum besse¬ 
ren Verständnis der TED-Register empfiehlt es sich, das Pro¬ 
gramm (Assembler-Listing) mit dem Monitor einzugeben und 
mit »g 2000« vom Monitor aus zu starten. Bei der Eingabe 
dürfen die Kommentare nicht mit eingegeben werden. Mit 
Hilfe dieses Maschinenprogramms lassen sich alle TED- 
Register als 8-Bit-Zahl darstellen. Die einzelnen Bits lassen 
sich durch Drücken der entsprechenden Tasten (0 bis 7 je 
nach Bit) beliebig ändern. Mit den Cursortasten 
< CRSR > -auf/abwärts können die einzelnen Register ange¬ 
wählt werden. Das Programm liegt normalerweise im Spei¬ 
cher ab Adresse $2000, kann aber beliebig verschoben wer¬ 
den. Es wird mit SYS 8192 gestartet und kann mit der STOP- 
Taste unterbrochen werden. Zum besseren Verständnis wird 
auch das dokumentierte Assembler-Listing des Programms 
abgedruckt. 


Der TED-Chip besitzt drei integrierte Timer, die für unter¬ 
schiedliche Aufgaben verwendet werden. Sie sind zum Bei¬ 
spiel für die Zufallszahlen verantwortlich. Die Timer werden 
kontinuierlich im Systemtakt von 1 MHz heruntergezählt. 
Unterschreiten sie dabei den Wert Null, werden sie wieder 
auf 65535 gesetzt, und gleichzeitig wird ein Interrupt ausge¬ 
löst. Die Timer werden also in einer millionstel Sekunde um 
1 heruntergezählt. Sie benötigen also etwa 65 ms, um von 
65535 auf den Wert 0 zu kommen. Die Timer sind über die 
ersten sechs Register (Register 0 bis 5) zu erreichen. Jeder 
Timer belegt 16 Bit, ist also 2 Byte lang. Die genauen Adres¬ 
sen der 3 Timer können Tabelle 1 entnommen werden. Läßt 
man sich die Timer-Register mit dem Programm anzeigen, so 
stellt man fest, daß die Bits nur wild flackern. Dies liegt daran, 
daß die Timer sehr viel schneller zählen, als dies das Pro¬ 
gramm wahrnehmen kann. Alle Timer lassen sich gleicherma¬ 
ßen beeinflussen. Versucht man zum Beispiel, im Low-Byte 
eines Timers ein Bit zu ändern, so kommt der Timer völlig zum 
Stillstand. Durch Änderung eines Bits im High-Byte werden 
die Timer wieder zum Laufen gebracht. Werden alle drei 
Timer gestoppt und nach Verlassen des Programms eine 
»Zufallszahl« mit dem Befehl 

PRINT RND(O) 

ermittelt, so ist das Ergebnis in jedem Falle Null. 

Register 6 des TED ist für die vertikale Bildschirmposition 
verantwortlich. 

Mit Bit 0 bis 2 kann der Bildschirm um 8 Punkte vertikal ver¬ 
schoben werden. 
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Bit 3 ist für die Bildschirmhöhe (24 oder 25 Zeilen) verant¬ 
wortlich. 

Ist Bit 3 gesetzt, stehen am Bildschirm 25 Zeilen zur Verfü¬ 
gung, andernfalls nur 24. 

Beim Löschen von Bit 4 wird der Bildschirm ausgeschaltet. 
Dies wird zum Beispiel bei Kassettenoperationen genutzt. 

Mit Bit 5 läßt sich die Hires-Grafik ein- beziehungsweise 
ausschalten. 

Der Extended-Color-Modus kann mit Bit 6 eingeschaltet 
werden (1 entspricht eingeschaltet, 0 ausgeschaltet). 


Bit 7 ist für den sogenannten Test-Modus verantwortlich. 

Für die horizontale Bildschirmposition ist Register 7 
zuständig. Auch hier kann mit Bit 0 bis 2 der Bildschirm um 
8 Punkte horizontal verschoben werden. 

Beim Löschen von Bit 0 wird der Bildschirm von 40 auf 38 
Spalten reduziert. 

Mit Bit 4 läßt sich der Multicolor-Modus ein- beziehungs¬ 
weise ausschalten. 

Setzt man Bit 5, wird die horizontale Position eingefroren. 
Vorsicht! Versucht man hier Bit 5 zu setzen, ist der Computer 


Assemblerlisting 



. 2113 

dO 

01 bne 

$2116 

Nein, dann weiter 






. 2115 

60 

rts 


ENDE 

. 2000 

20 4f ff jsr $ff4f 


Bildschirmmaske ausgeben 












Taste 0-7 



. 2003 93 0d Od 

20 20 20 20 

54 

Bildschirmmaske 






. 200b 45 44 2d 

52 45 47 49 

53 


. 2116 

c9 

11 cmp 

#$11 

Cursor-Down-Taste ? 

. 2013 54 45 52 

20 20 20 20 

20 


. 2118 

fO 

29 beq 

$2143 

Ja, dann $2143 

. 201b 

20 Od 20 

20 20 20 3d 

3d 


. 211a 

c9 

91 cmp 

#$91 

Cursor-Up-Taste ? 

. 2023 3d 3d 3d 

3d 3d 3d 3d 

3d 


. 211 c 

fO 

3c beq 

$215a 

Ja, dann $215a 

. 202b 3d 3d Od 

Od 20 20 20 

42 


. 211e 

c9 

38 cmp 

#$38 

Größer 7-Taste 

. 2033 49 54 20 

20 20 20 20 

41 


. 2120 

bO 

b2 bcs 

$20d4 

Ja, dann $20d4 

. 203b 44 52 45 

53 53 45 20 

20 


. 2122 

c9 

30 cmp 

#$30 

Kleiner O-Taste ? 

. 2043 20 20 20 

Od 20 37 36 

35 


. 2124 

30 

ae bmi 

$20d4 

Ja, dann $20d4 

. 204b 34 33 32 

31 30 20 20 

20 


. 2126 

38 

sec 


Carry=1 

. 2053 20 20 20 

20 20 20 20 

20 


. 2127 

e9 

30 sbc 

#$30 

Bit 

. 205b 

20 20 20 

Od d5 oO cO 

cO 


. 2129 

aa 

tax 


... 0-7 

. 2063 cO cO cO 

oO cO c9 20 

d5 


. 212a 

a9 

01 lda 

#$01 

... setzen/löschen. 

. 206b 

cO cO cO 

cO cO c9 20 

20 


. 212c 

eO 

00 cpx 

#$00 


. 2073 20 20 20 

Od dd 20 20 

20 


. 212e 

fO 

04 beq 

$2134 


. 207b 

20 20 20 

20 20 dd 20 

dd 


. 2130 

Oa 

asl 



. 2083 24 20 20 

20 20 dd 20 

20 


. 2131 

ca 

dex 



. 208b 

20 20 20 

Od ca cO cO 

cO 


. 2132 

dO 

fc bne 

$2130 


. 2093 

cO cO cO 

cO cO cb 20 

ca 


. 2134 

85 

15 sta 

$15 


. 209b 

cO oO cO 

cO cO cb Od 

Od 


. 2136 

a4 

d8 ldy 

$d8 


. 20a3 

53 54 45 

55 45 52 55 

4e 

S4GR ( 

. 213t. , : >9 

00 ff lda 

$ff00,y 


. 20ab 47 3a Od 

Od 54 41 53 

54 


. 213b 

45 

15 eor 

$15 


. 20b3 45 4e 20 

31 2d 37 Od 

55 


. 213d 

99 

00 ff sta 

$ff00,y 


. 20bb 4e 44 Od 

43 55 52 53 

4f 


. 2140 

38 

sec 



. 20e3 52 20 55 

50 2f 44 4f 

57 


. 2141 

bO 

91 bcs 

$20d4 

weiter 

. 20cb 4e Od 00 

ea ea 














Cursor down 



. 20d0 

a9 00 

lda #$00 


Offset im TED-Register 






. 20d2 

85 d8 

sta $d8 


... initialisieren 

. 2143 

a5 

d8 lda 

$d8 

Cursor down 

. 20d4 

18 

clc 


Carry = 0 

. 2145 

fO 

09 beq 

$2150 

:= Register 

. 20d5 

a2 08 

ldx #$08 


Cursor auf 

. 2147 

c9 

3e cmp 

#$3e 

... zurückblättem. 

. 20d7 

aO 01 

ldy #$01 


... Punkt (1,8) 

. 2149 

fO 

09 beq 

$2154 


. 20d9 

20 fO ff jsr $fffO 


... setzen 

. 2l4b 

c6 

d8 dec 

$d8 


. 20dc 

a4 d8 

ldy $d8 


Holt 

. 2l4d 

38 

sec 



. 20de 

b9 00 ff lda $ffOO,. 


... TED-Register 

. 2l4e 

bO 

84 bcs 

$20d4 


. 20el 

85 14 

sta $14 


Wert Zwischenspeichern 

. 2150 

a9 

3f lda 

#$3f 


. 20e3 

48 

pha 


Wert auf Stack 

. 2152 

dO 

02 bne 

$2156 


. 20e4 

a9 08 

lda #$08 


Wert 

. 2154 

a9 

lf lda 

#$lf 


. 20e6 

85 d9 

sta $d9 


... als 

. 2156 

85 

d8 sta 

$d8 


. 20e8 

a9 00 

lda #$00 


... Binärzahl 

. 2158 

dO 

f3 bne 

$2l4d 


. 20ea 

a2 01 

ldx #$01 


... darstellen... 






. 20ec 

06 14 

asl $14 




Cursor up 



. 20ee 

bO 02 

bcs $20f2 








. 20f0 

a2 00 

ldx #$00 



. 215a 

a5 

d8 lda 

$d8 

Cursor up 

. 20f2 

20 5f a4 jsr $a45f 



. 215c 

c9 

lf cmp 

#$lf 

:= Register 

. 20f5 

06 d9 

dec $d9 



. 215e 

fO 

09 beq 

$2169 

... vorblättern... 

. 20f7 

dO ef 

bne $20e8 



. 2160 

c9 

3f cmp 

#$3f 


. 20f9 

18 

clc 


Carry = 0 

. 2162 

fO 

09 beq 

$216d 


. 20fa 

a2 08 

ldx #$08 


Cursor 

. 2164 

e6 

d8 inc 

$d8 


. 20fc 

aO Od 

ldy #$0d 


... auf Punkt (13,8) 

. 2166 

38 

sec 



. 20fe 

20 fO ff jsr $fffO 


... setzen 

. 2167 

bO 

e5 bcs 

$2l4e 


. 2101 

68 

pla 


Holt Wert vom Stack 

. 2169 

a9 

3e lda 

#$3e 


. 2102 

85 14 

sta $14 


Wert Zwischenspeichern 

. 216 b 

dO 

02 bne 

$2l6f 


. 2104 

a9 ff 

lda #$ff 


Register 

. 2l6d 

a9 

00 lda 

#$00 


. 2106 

20 10 fb jsr $fblO 


... als 

. 2l6f 

85 

d8 sta 

$d8 


. 2109 

a5 d8 

lda $d8 


... HEX-Zahl 

. 2171 

38 

sec 



. 210b 

20 10 fb jsr $fbl0 


... darstellen 

. 2172 

bO 

f2 bcs 

$2166 


. 210e 

20 e4 ff jsr $ffe4 


(GEHN) Zeichen holen 






. 2111 

c9 03 

cmp #$03 


STOP-Taste ? 

Assembler-Listing zur 

Anzeige 

der TED-Register 
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nur mit einem Reset wieder zu beleben. Das Programm kann 
anschließend mit SYS 8192 neu gestartet werden. 

Bit 6 des Registers ist für PAL- beziehungsweise NTSC- 
Darstellung verantwortlich. 

Setzt man in diesem Register Bit 7, ist es unmöglich, 
reverse Zeichen auf dem Bildschirm auszugeben. 

TED steuert Interrupt 


Das Tastatur-Latch-Register (Register 8) ist für die Joy¬ 
stick- und Tastaturabfrage verantwortlich. Dieses Register 
kann mit unserem Programm nicht geändert werden. Es sind 
immer alle 8 Bit gesetzt. 

Wie eingangs erwähnt, ist der TED auch für die Interrupt- 
Steuerung verantwortlich. Register 9 übernimmt die Steue¬ 
rung des Hardware-Interrupts. 

Bit 0 und 5 des Interupt-Request-Registers sind unbe¬ 
nutzt. 

Bit 1 signalisiert einen Raster-Interrupt 


Bit 2 ist für einen eventuell vorhandenen Lightpen vorgese¬ 
hen und soll einen vom Lightpen ausgelösten Interrupt anzei- 
gen. 

Bit 3 zeigt an, daß der Interrupt durch Unterlauf von Timer 
1 ausgelöst wurde. 

Bit 4 und Bit 6 haben die gleiche Funktion, nur für Timer 2 
und 3. 

Bit 7 signalisiert allgemein das Auftreten eines Interrupts. 

Das zweite wichtige Register für die Interrupt-Erzeugung 
ist das Interrupt Mask Register (Register 10). 

Bit 0 dieses Registers beherbergt Bit 8 des folgenden 
Registers (Rasterregister). 

Ist Bit 1 gesetzt, wird ein Raster-Interrupt zugelassen. Wird 
mit unserem Programm dieses Bit gelöscht, so ist kein 
Raster-Interrupt mehr zugelassen, und der Computer ist nur 
noch mit Hilfe der Reset-Taste zu retten. 

Soll beim Unterlauf von Timer 1 ein Interrupt erfolgen, muß 
Bit 3 gesetzt sein. 

Bit 4 und Bit 6 erledigen die gleiche Aufgabe für Timer 2 
und 3. 


Register 

Adresse 

HEX/DEZ 

Funktion 

Bit 7 

Bit 6 

Bit 5 

Bit 4 

Bit 3 

Bit 2 

Bit 1 

BltO 

0 

$FF00/ 

65280 

Timer 1 (Low-Byte| 

Bit 7 

Bit 6 

Bit 5 

Bit 4 

Bit 3 

Bit 2 

Bltl 

BltO 

1 

SFF01 / 

65281 

Timer 1 (High-Byte) 

Bit 16 

Bit 14 

Bit 13 

Bit 12 

Bit 11 

Bit 10 

Bit 9' 

Bit 8 

2 

SFF02 / 

85282 

Timer 2 (Low-Byte) 

Bit 7 

Bit 6 

Bit 5 

Bit 4 

Bit 3 

Bit 2 

Bit 1 

BitO 

3 

SFF03/ 

65283 

Timer 2 (High-Byte) 

Bit 15 

Bit 14 

Bit 13 

Bit 12 

Bit 11 

Bit 10 

Bit 9 

BltB 

4 

SFF04 / 

65284 

Timer 3 (Low-Byte) 

Bit 7 

Bit 6 

Bit 5 

Bit 4 

Bit 3 

Bit 2 

Bit 1 

BitO 

5 

SFF05 / 

65285 

Timer 3 (High-Byte) 

Bit 15 

Bit 14 

Bit 13 

Bit 12 

Bit 11 

Bit 10 

Bit 9 

Bit 8 

6 

SFF06 / 

65286 

Vertikale Bildschirmposition 

Test 

ECM 

HiRes 

Bildschirm 

24 oder 

Vertikale Bildschirmposition 






ein-aus 

ein-aus 

ein-aus 

25 Zeilen 




7 

SFF07/ 

65287 

Horizontale Bildschirmposition 

RVS mögl./ 

PAUNTSC 

horizont. 

Mullicolor 

38 oder 

Horizontale Blldschirmposltion 





RVS unmögl. 


Position 

ein/aus 

40 Spalten 







g*er onun®»r 

eintrieren 






8 

SFF08 / 

65288 

Tastatur-Latch 




Tastatur-Matrix 




9 

SFF09 / 

65289 

Interrupt-Request-Register 

IQR 

Timer 3 

- 

Time 2 

Time 1 

Lightpen- 

Raster- 

- 










Interrupt 

interrupt 


10 

SFFOA / 

65290 

Interrupt-Mask-Register/IRQ-RasterzeilB Bit 8 

- 

Time 3 

- 

Time 2 

Time 1 

Lightpen- 

Raster- 

IRQ- 










Interrupt 

Interrupt 

Rasterzeile 












Bit 8 

11 

$FF0B/ 

65291 

IRQ-Rasterzeile (Bit 0 bis 7) 

Bit 7 

Bit 6 

Bit 5 

Bit 4 

Bit 3 

Bit 2 

Bit t 

BitO 

12 

SFFOC / 

65292 

Hardware-Cursor (Bit 8 bis 9) 



- unbenutzt - 



Bit 9 

Bit 8 

13 

SFFOD/ 

65293 

Hardware-Cursor (Bit 0 bis 7) 

Bit 7 

Bit 6 

Bit 5 

Bit 4 

Bit 3 

8112 

Bit 1 

BitO 

14 

SFFOE / 

65294 

Frequenz Tongenerator 1 (Bit 0 bis 7) 

Bit 7 

Bit 6 

Bit 5 

Bit 4 

Bit 3 

Bit 2 

Bit 1 

BitO 

15 

SFFOF / 

65295 

Frequenz Tongenerator 2 (Bit 0 bis 7) 

Bit 7 

Bit 6 

Bit 5 

Bit 4 

Bit 3 

Bit 2 

Bit 1 

BitO 

16 

SFF10 / 

65296 

Frequenz Tongenerator 2 (Bit 8 bis 9) 



- unbenutzt - 



Bit 9 

Bit 8 

17 

$FF11 / 

65297 

Soundregister 

Ton ein/aus 

Rauschen 

Stimme 2 

Stimme 1 


- Lautstarke - 







ein/aus 

ein/aus 

ein/aus 





18 

SFF12/ 

65298 

Frequenz Tongenerator 1 

(Bit 8 bis 9)/Bit Map-Adr./RAM-ROM 

* 

- 

Bit Map Basisadresse 

Daten aus 
RAM/ROM 

Tongenerator 1 

Bit 9 + Bit 8 

19 

SFF13/ 

65299 

Basisadresse Zeichengenerator/Slalus 



Zeichensatz - 

Basisadresse 


Single Clock 

Status 

20 

SFF14/ 

65300 

Adresse Bild- und Farb-Speicher 


- Bild- und Farbspelcher - Basisadresse - 


- unbenutzt 


21 

SFF1S / 

65301 

Hintergrundfarb'ä 

- 


- Helligkeit - 



- Farbe - 


22 

SFF16 / 

65302 

Vordergrundlarbe 

- 


- Helligkeit - 



- Farbe - 


23 

SFF17 1 

65303 

Mullicolor 1 

- 


- Helligkeit - 



- Farbe - 


24 

SFF18 / 

65304 

Multicolor 2 

- 


- Helligkeit - 



- Farbe - 


25 

$FF19 / 

65305 

Rahmenlarbe 

- 


- Helligkeit - 



- Farbe - 


26 

$FF1A / 

65306 

2. Cursorpositionierung 

- 

- 


- 

- 

- 

- Bit 8 und 9 
von Register 28 - 

27 

SFF1B / 

65307 

2. Cursorpositionierung 

- Bildschirmpositionierung des 2, Cursors - 





28 

SFF1C / 

65308 

Rasterzeile (Bit 8) 




unbenutzt - 




Bit 8 

29 

SFF1D/ 

65309 

Rasterzoile (aktuell) (Bit 0 bis 7) 

Bit 7 

Bit 6 

Bit 5 

Bit 4 

Bit 3 

Bit 2 

Bit t 

BltO 

30 

SFF1E / 

65310 

Aktuelle Rasterspalte 

Bit 7 

Bit 6 

Bit 5 

Bll 4 

Bit3 

Bit 2 

Bltl 

BitO 

31 

SFF1F/ 

65311 

Cursorsteuerung 

- 


- Blinkge3chwindigkelt - 


- Vertikale Subadresse - 

62 

SFF3E / 

65342 

ROM-Bank 



Schreibbetehl schaltet ROM-Bank ein 



63 

SFF3F/ 

65343 

RAM-Bank 



Schreibbefehl schaltet RAM-Bank ein 




Tabelle 1. Alle TED-Register im Überblick 
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C16, Plus/4 


Gesetztes Bit 2 ermöglicht einen Interrupt durch den Light- 
pen. 

Bit 5 und Bit 7 haben keine Funktion, sind aber immer 
gesetzt. 

Register 11 enthält die unteren 8 Bit der Rasterzeile. Das 
neunte Bit befindet sich in Bit 0 des Interrupt Mask Registers. 
Register 12 und 13 beinhalten die Position des Hardware- 
Cursors. Da hier maximal 1000 Positionen in Frage kommen, 
genügen 10 Bit zur eindeutigen Darstellung (2 hoch 10 = 
1024 Positionen). Von Register 12 sind also nur die ersten 
zwei Bit erforderlich. 

Bit 2 bis Bit 7 sind unbenutzt. 

Register 13 enthält Bit 0 bis 7 des Hardware-Cursors. 
Wenn alle Bits (0 bis 9) gelöscht sind, dann blinkt der Cursor 
in der Home-Position des Bildschirms. Sind nur Bit 0,1,3,6 
und Bit 7 gesetzt, so steht der Cursor genau über dem Buch¬ 
staben »B« der Bildschirmmaske. 

Ebenso wie der Hardware-Cursor benötigen die Frequenzen 
der beiden Tongeneratoren 10 Bit. Auch hier sind Werte zwi¬ 
schen 0 und 1023 zugelassen. Register 14 enthält Bit 0 bis 
Bit 7 der Frequenz für Tongenerator 1. 

Bit 8 und 9 sind im Register 18 (Bit 0 und Bit 1) enthalten. 

Die Frequenz des zweiten Tongenerators ist in den Regi¬ 
stern 15 und 16 beherbergt. Auch hier enthält Register 15 
das Low-Byte der Frequenz. Bit 8 und Bit 9 befinden sich in 
Register 16 (Bit 0 und Bit 1). Die restlichen Bits des Registers 
sind unbenutzt. 

Register 17 des TED ist für die Tonerzeugung verantwort¬ 
lich. 

Bit 0 bis 3 selektieren die Lautstärke zwischen 0 und 8. 

Bit 4 schaltet Stimme 1 ein beziehungsweise aus. 

Stimme 2 wird mit Bit 5 geschaltet. 

Ist Bit 6 gesetzt, so ist der Rauschgenerator der Stimme 2 
aktiviert. 646 R 

Gesetztes Bit 7 schaltet global den Ton aus. 

Wie schon erwähnt, beinhalten Bit 0 und Bit 1 des Registers 
18 das High-Byte der Frequenz von Tongenerator 1. 

Bit 2 ist dafür verantwortlich, ob der Zeichensatz aus RAM 
oder ROM gelesen wird. 

Ist Bit 2 gelöscht, so ist der Zeichensatz im RAM aktiv. 

Bit 3 bis Bit 5 enthalten die Bitmap-Basisadresse. 

Die letzten beiden Bit des Registers sind unbenutzt. 

Register 19 enthält die Adresse des Zeichengenerators. 

Dies belegt Bit 2 bis Bit 7. 

Bit 0 gibt Auskunft über den Status (ROM : = Bit 0 gesetzt). 

Bit 1 des Registers ist das Single-Clock-Bit. 


Die Basisadresse des Bild- und Farbspeichers befindet 
sich im Register 20 (Bit 3 bis Bit 7). 

Bit 0! bis Bit 2 sind nicht benutzt. 

Die Farbregister des TED sind folgendermaßen aufgeteilt: 

Bit O bis Bit 3| enthalten die Farbe (0 bis 15). Die Helligkeit 
(0 bis 7) übernehmen Bit 4 bis Bit 6. 

Bit 7 aller Farbregister ist unbelegt. 

Register 21 ist für die Hintergrundfarbe verantwortlich. Die 
Vordergrundfarbe enthält Register 22. Multicolor 1 und 2 
sind in den Registern 23 und 24 untergebracht. Register 24 
enthält schließlich die Rahmenfarbe. 

Wird in das Register 27 in einer modifizierten Interrupt- 
Routine ein Wert geschrieben, schaltet sich ein zweiter Cur¬ 
sor ein, der sich abhängig vom ersten Cursor in den unteren 
fünf Zeilen bewegt. 

Register 28 und 29 enthalten die momentane Rasterzeile. 
Verändert man hier ein Bit, so beginnt der Bildschirm zu flim¬ 
mern. Je größer das veränderte Bit (zum Beispiel Bit 8) um 
so größer die Verwirrung auf dem Schirm. 

In Register 26 stehen in Bit 0 und Bit 1 das achte und das 
neunte Bit des Registers 27. Die Bits 2 bis 7 sind nicht 
benutzt. 

Da der Fernseher genau 512 Zeilen darstellt, genügen für 
die Rasterzeile 9 Bit. 

Register 30 beherbergt die aktuelle Rasterzeile. 

Register 29 beherbergt Bit 0 bis Bit 7, während Bit 8 im 
Register 28 untergebracht ist. 

Mit dem dritten bis siebten Bit des Registers 31 läßt sich 
die Blitzgeschwindigkeit des Cursors festlegen. 

Bit 1 bis 7 dieses Registers sind unbenutzt. 

Zum Schluß zwei Register, die für das Einschalten der 
RAM- beziehungsweise ROM-Bank verantwortlich sind. 

Wird per Schreibbefehl auf Register 62 zugegriffen, wird 
die RGivi Bank eingeschaltet. 

Ein Schreibbefehl in Register 63 bewirkt das Einschalten 
der RAM-Bank. 

Versucht man mit dem Programm ein Bit zu setzen, wird ein 
Reset ausgelöst. 

Nach diesem kleinen Streifzug durch den Multifunktions¬ 
baustein 7360 (TED), können Sie abwägen, welche Möglich¬ 
keiten sich für den Maschinenprogrammierer eröffnen. Mit 
Hilfe des Programms »TED-Register« kann optimal experi¬ 
mentiert werden. Einer Manipulation des Raster-Interrupts, 
des Zeichensatzes oder der Timer des CI6, C116 oder 
Plus/4 steht nun nichts mehr im Wege. 

(Christian Quirin Spitzner/ah) 
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7 

pun/rt 


Künstler auf 
dem C16 und Plus/4 


Die Grafikbefehle des C16 und des Plus/4 ermög¬ 
lichen auch dem Einsteiger effektvolle Program¬ 
mierung der hochauflösenden Grafik. Nutzen Sie 
die Stärken des Basic V 3.5 in eigenen Basic- 
Programmen. Werden Sie zum perfekten Grafiker 
mit Ihrem C16. Lernen Sie mit uns Ihren Computer 
kennen. 

rafik auf dem Computer war schon immer ein faszinie¬ 
rendes Thema. Und so werden Sie sicherlich schon 
einmal gebannt vor dem Fernseher gesessen haben, 
wenn eine der bekannten Sendungen und Dokumentationen 
über Computergrafik auf dem Programm stand. Nicht unbe¬ 
gründet war auch der erste Kinofilm (Tron), der bis auf die 
Schauspieler nur aus Computer-Grafiken bestand, ein großer 
Erfolg. Nachdem anfangs nur Großcomputer die Fähigkeit zur 
grafischen Darstellung hatten, nahm auch auf dem Mikro¬ 
computermarkt die Nachfrage nach Grafik-Computern zu. So 
war auf dem Sektor der Heimcomputer der Commodore 64 
wohl der erste, der ordentliche Grafikfähigkeiten zu einem 
erschwinglichen Preis anbot. Weitere folgten nach. 

Das Problem beim C 64 war und ist aber, daß die Grafikan- 
steuerung so kompliziert zu bedienen ist, daß sie ein Laie 
kaum zu nutzen vermag. Von Basic aus kann die Einzelpunkt¬ 
grafik nur durch PEEK und POKE geschehen, wobei kom¬ 
plexe Berechnungen nötig sind. Die Anwender des Commo¬ 
dore Plus/4 haben es da schon leichter. Das umfangreiche 
und leistungsfähige Basic 3.5 dieses Computers erlaubt eine 
komfortable Erzeugung von Grafiken durch implementierte 
Basic-Befehle. Sie machen es auch dem Computer-Laien 
möglich, in recht kurzer Zeit schöne Ergebnisse zu erzielen. 

So ist es auch das Thema dieses Kurses, die Programmie¬ 
rung und Anwendung von Grafik auf dem C16 und Plus/4 ver¬ 
ständlich zu machen. Sie werden lernen, auf möglichst einfa¬ 
che Weise gute Grafiken zu erzeugen. Wenn es auch nach 
dem ersten Blick auf die Grafikbefehle nicht so aussieht, so 
können doch mit einigen Tricks recht wirkungsvolle Effekte 
entstehen. Daneben werden Sie ebenfalls erfahren, wie Sie 
Ihre Grafikwerke auf der Diskette speichern und wieder laden 
können. Doch der Weg bis zum perfekten Grafikkünstler ist 
weit, und so werden wir am besten gleich mit den Grundlagen 
der Grafikprogrammierung beginnen. 


Neben den Buchstaben, Zahlen und Sonderzeichen, wie 
< + >, < % > oder < & >, besitzt der Plus/4 eine Vielzahl an 
weiteren Zeichen, die auch Grafikzeichen genannt werden. 
Man kann sie über die Tastatur erreichen, wenn man mit 
<SHIFT COMMODORE > auf Großbuchstaben umgeschal¬ 
tet hat. Diese sind zusätzlich auf den Tasten abgebildet, 
wobei man durch gleichzeitiges Drücken der entsprechen¬ 
den Ifoce mit <SHIFT> die jeweils rechten und in Verbin¬ 
dung mit der < COMMODORE > -Taste die jeweils linken Zei¬ 
chen auf den Bildschirm bringen kann. Sie eignen sich her¬ 
vorragend für Tabellen, Diagramme und einfache Grafiken. Da 
sie wie normale Buchstaben behandelt werden, sind sie auch 
recht einfach mit der PRINT-Anweisung auf dem Monitor an¬ 
zuzeigen. 


Bilder erzeugen mit Grafikzeichen 


Wie Sie vielleicht wissen, können Sie auf dem Bildschirm 
25 Zeilen zu je 40 Zeichen darstellen. Insgesamt sind das 
demnach 1000 Zeichen (25*40 = 1000), die Ihr Bildschirm 
aufnehmen kann. Damit diese Zeichen auch zu sehen sind, 
hat der Plus/4 einen Bildschirmspeicher, in dem alle Zeichen 
der Reihe nach von links oben nach rechts unten abgelegt 
sind. Dieser ist genau 1000 Byte groß (für jedes Zeichen ein 
Byte) und liegt im Bereich von hexadezimal $0C00 bis 
$0FE7 (dezimal 3072-4071). Das linke obere Zeichen ist 
also in der Speicherstelle 3072 abgelegt, das letzte Zeichen 
ganz rechts unten belegt die letzte Adresse 4071. Sie kön¬ 
nen nun den Bildschirmspeicher direkt manipulieren, indem 
Sie die einzelnen Zeichen an die entsprechende Bildschirm¬ 
position POKEn. Dafür hat jedes Zeichen einen bestimmten 
Wert, den sogenannten Bildschirmcode, der an die entspre¬ 
chende Adresse gespeichert werden muß. Welche Werte Sie 
dabei für jedes Zeichen verwenden müssen, können Sie in 
Ihrem Handbuch im Anhang unter Bildschirmcode nachle- 
sen. So setzt zum Beispiel folgender Befehl ein A (Bild¬ 
schirmcode 1) an die fünfte Position in der zweiten Zeile: 
POKE 3116,1 

Listing 1 demonstriert dies noch einmal, indem es zufällig 
Buchstaben der Reihe nach in den Bildschirmspeicher 
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10 REM *** BILDSCHIRMMANIPULATION *** 
20 SCNCLR 

30 FOR X=1 TO 1000 

40 POKE 3071+X,INT(1+RND(TI)*27) 

50 NEXT X 

Listing 1. Eine zufällige Bildschlrmmanipulation 


POKEt. Man nennt diese Art der Grafik auch Lowres-Grafik 
(Lowres = Low Resolution) was soviel wie niedrige Auflösung 
bedeutet. Sie können ja nur die groben Grafikzeichen ver¬ 
wenden, wodurch Sie selbstverständlich in der Anwendung 
eingeschränkt sind. Doch sollte man nicht glauben, daß sich 
deshalb nur grobe Tabellen oder ähnliches erzeugen lassen. 
In Verbindung mit den Cursortasten lassen sich verblüffend 
schöne Bilder erzeugen, die man eigentlich von der Lowres- 
Grafik nicht gewöhnt ist. Doch dazu wollen wir später kom¬ 
men. Ein weiterer Zusatz ist die Möglichkeit, Text durch das 
Setzen des Attributes »Blinken« hervorzuheben. Listing 2 
demonstriert dies anschaulich. 


10 REM *** ZEICHEN BLINKEN *** 

20 PRINT "DtSYNTH.:130>ECSYNTH.:132JR BCSYNT 
H.:130JL1SYNTH.:132>ItSYNTH.;130JN1SYNTH. 
:132>K {SYNTH.:130JE{SYNTH.:132JF{SYNTH. : 1 
30>F{SYNTH.:132JE{SYNTH.:130>K{SYNTH.:132 
>T I{SYNTH.:130>S{SYNTH.:132>T S{SYNTH.:1 
30>E{SYNTH.:132>H<SYNTH.:130TR {SYNTH.:13 
2>N{SYNTH.:130>UTSYNTH.:132>E{SYNTH. : 130> 
T {SYNTH.;132>Z{SYNTH.:130>L{SYNTH.:132>I{ 
SYNTH.:130TC{SYNTH.:132>H" 

Listing 2. Synthetische Steuerzeichen: 

130 = FLASH ON, 132 = FLASH OFF 


Wenden wir uns nun den Farbmöglichkeiten des Plus/4 zu, 
was auch später bei der hochauflösenden Grafik von großer 
Bedeutung sein wird. Der Plus/4 kann 16 verschiedene Far¬ 
ben auf dem Bildschirm darstellen, von denen jede einen 
sogenannten Luminanzwert hat, der die Helligkeit der Farbe 
bestimmt. Dieser kann für jede Farbe die Werte 0 (dunkel) bis 
7 (hell) annehmen. Im ganzen haben wir nach sorgfältiger 
Rechnung 16x8 gleich 128 verschiedene Farbtöne zur Ver¬ 
fügung. 

Sicherlich haben Sie schon einmal im Direktmodus die Zei¬ 
chenfarbe geändert, indem Sie die Tasten <1 > bis <8> 
zusammen mit der < CTRL>-oder < CBM >-Taste gedrückt 
haben. Dies können Sie selbstverständlich auch im Pro¬ 
gramm in einer PRINT-Anweisung tun, da diese Farbtasten 
< CTRL >-Steuerzeichen sind. Sie sind wie die Cursortasten 
einfach an die entsprechende Stelle einzubinden, wie es in 
Listing 3 realisiert ist. 

Eine Änderung der Zeichenfarbe ist aber auch durch den 
komfortablen Basic-Befehl COLOR möglich. Mit ihm lassen 
sich zusätzlich noch die Hintergrund- und Rahmenfarbe 


0 REM *** FARBE IM TEXT *** 

5 COLOR 0,1 

10 PRINT "{YELLOW>JEDES {GREY1IWORT {CYAN>ER 
SCHEINT {PURPLE>IN {BLUE>EINER M 
20 PRINT "{GREY2JANDEREN {ORANGE>FARBE{WHITE 
>" 

Listing 3. Einfache Farben 


ändern. Er hat folgende Syntax: 

COLOR Farbbereich,Farbwert,Luminanz 
Der Farbbereich kann die Werte 0 bis 4 annehmen, wobei 
Sie aus der Tabelle in Bild 1 die Bedeutung eines jeden Wer- 


Register 

Bedeutung 

0 

Hintergrundfarbe 

1 

Zeichenfarbe (Vordergrund) 

2 

Mehrfarbenregister 1 

3 

Mehrfarbenregister 2 

4 

Bildschirmrand 


Blld 1. Die Bedeutung der einzelnen Farbregister 


tes ersehen können. Mit den Bereichen 2 und 3 können Sie 
zu diesem Zeitpunkt allerdings noch nichts anfangen, da 
diese erst bei der hochauflösenden Grafik benötigt werden. 
Jede der 16 Farben bekommt eine Nummer von 1 bis 16 
zugeordnet, unter der sie angesprochen wird. In Bild 2 sind 
diese mit ihrer entsprechenden Farbe aufgelistet. Mit Lumi¬ 
nanz können Sie schließlich, wie schon erwähnt, die Hellig¬ 
keit der Farbe einstellen. Die Werte reichen dabei von 0 (dun¬ 
kel) bis 7 (hell). Dieser Parameter muß jedoch nicht unbedingt 
mit angegeben werden. Wird er weggelassen, so nimmt der 
Computer automatisch den Wert 7 (größte Helligkeit). 
Gerade mit der Luminanz lassen sich herrliche Effekte erzie¬ 
len, wie es Listing 4 zeigt. So können Sie zum Beispiel auch 
Schriftzüge aus- und wieder einblenden. Wenn Sie Listing 5 
abtippen, können Sie das verfolgen. 


Farbwert 

Farbe 

it If^pn 7 

Schwarz 

2 

Weiß 

3 

Rot 

4 

Zyan 

5 

Purpur 

6 

Grün 

7 

Blau 

8 

Gelb 

9 

Orange 

10 

Braun 

1 1 

Gelbgrün 

1 2 

Rosa 

1 3 

Blaugrün 

1 4 

Hellblau 

1 S 

Dunkelblau 

16 

Hellgrün 


Bild 2. Welche Farben haben welche Farbwerte? 


10 REM *** LUMINANZEFFEKT *** 

20 SCNCLR : F=2: REM FARBE 
25 DO 

30 FOR X~0 TO 7s COLOR 0,F,X: COLOR 4,F,7-Xi 
GOSUB 100: NEXT X 

40 FOR X=6 TO 0 STEP -ls COLOR 0,F,X: COLOR 
4,F,7—X: GOSUB 100: NEXT X 
50 LOOP 

100 FOR Y=1 TO 50: NEXT Y: RETURN 

Listing 4. Ein- und Ausblenden 


Kommen wir zu dem Punkt, der die Grafikfans eigentlich am 
meisten interessieren wird: die hochauflösende Grafik. Sie 
ermöglicht die Ansteuerung jedes einzelnen Bildschirm¬ 
punktes. Wie der C 64 besitzt der Plus/4 eine Auflösung von 
64000 einzeln ansprechbaren Grafikpunkten. Beim C64 ist 
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es nun sehr schwierig, Grafiken mit der hochauflösenden 
Grafik selbst zu programmieren, da dies umfangreiche 
Berechnungen nötig macht. Plus/4-Besitzer sind dabei in 
einer glücklicheren Lage, da das komfortable Basic 3.5 die 
Hires-Grafik, wie sie auch genannt wird, voll unterstützt. Um 
umständliche Speichermanipulationen braucht sich der 
Plus/4-Grafiker also nicht kümmern. 


IO REM *** EINBLENDEN *** 

20 CÜLOR 0,1,0: COLOR 4,1,0 
30 RESTORE 
40 DO 

50 SCNCLR : W=200: GOSUB 500: READ A* 
55 IF A$="***" THEN EXIT 
60 FOR X=0 TO 7 
65 COLOR 1,2,X 

70 PRINT "{HOME,12D0WNJ" TAB<10)A* 

80 W=50: GOSUB 500 
90 NEXT X 

95 W=200: GOSUB 500 
100 FOR X=6 TO 0 STEP -1 
110 COLOR i,2,X 

120 PRINT "{HOME,12D0WN}" TABU01A* 

125 W=50: GOSUB 500 
130 NEXT X 
140 LOOP 
150 GOTO 30 

500 FOR Y=1 TO W: NEXT Y: RETURN 
600 DATA "{7SPACE>SIE SEHEN" 

610 DATA "{3SPACE>DASS DAS EINBLENDEN" 
620 DATA "EIN SEHR GUTER EFFEKT IST" 
630 DATA "***" 

Listing 5. Einfacher Vorspann; kein Problem 


Bevor wir unsere ersten Grafikbilder erzeugen, noch etwas 
Grundsätzliches zur hochauflösenden Grafik des Plus/4. 
Wenn Sie mit dem Plus/4 normal im Textmodus arbeiten, wer¬ 
den Ihre Basic-Programme ab der Speicheradresse 4096 
(hexadezimal $1000) abgelegt. Darunter liegt der Bild¬ 
schirmspeicher und das dazugehörige Farb-RAM. Verwen¬ 
den Sie die hochauflösende Grafik, benötigt der Computer 
einen eigenen Grafikspeicher, um alle gesetzten und nicht 
gesetzten Grafikpunkte zu verwalten. Wir haben vorhin 
schon einmal von der Auflösung gesprochen. Sie beträgt bei 
dem Plus/4 64000 Punkte. Für jeden Bildschirmpunkt wird 
ein Bit gebraucht, das gesetzt ist (1), wenn der Punkt zu 
sehen, und gelöscht ist (0), wenn der Punkt nicht zu sehen 
ist. Es werden also 64000 Bit für das gesamte Grafikbild 
gebraucht, was umgerechnet genau 8000 Byte Speicher 
ergibt. Hinzu kommen noch ein extra Grafikfarb- und Lumi- 
nanzspeicher mit jeweils 1 KByte Größe. Diese knappe 10 
KByte Speicher nimmt sich der Computer vom Basic-RAM ab 
der Adresse 4096 ($1000). Da dort auch Ihre Basic- 
Programme beginnen, wird der Basic-Anfang kurzerhand 
nach Adresse 16384 ($4000) verlegt und ist somit dem Gra¬ 
fikspeicher nicht mehr im Weg. Damit fällt das große Problem 
der eventuellen Speicherkollision von Basic-Programm und 
Grafikspeicher, wie es beim C64 auftauchen konnte, weg. 

Bevor Sie auf den Grafikspeicher zugreifen können, müs¬ 
sen Sie ihn zuerst definieren. Dies geschieht mit dem Basic- 
Befehl GRAPHIC. Die Syntax lautet allgemein so: 

GRAPHIC Modus,Löschen 

Ähnlich wie bei COLOR können Sie auch hier verschiedene 
Modi wählen. Welche es dabei gibt, ist in Bild 3 tabellarisch 


abgedruckt. Der übliche ist der Modus 0, der beim Einschal¬ 
ten des Computers vorliegt. Hier können alle Zeichen auf 
dem Bildschirm dargestellt werden. Sie befinden sich also im 
normalen Textmodus. Die anderen vier Modi führen dann 
schon in das Reich der Grafik, wobei Sie, wie Sie in der 
Tabelle in Bild 3 sehen können, zwei Grafikkarten zur Verfü¬ 
gung haben: die hochauflösende Grafik und die Mehrfarben- 
Grafik. Beide Grafikmodi können eigentlich als hochauflö¬ 
sende Grafik bezeichnet werden, weisen aber markante 
Unterschiede auf. Zusätzlich kann ein weiterer Parameter 
zum Modus angegeben werden. Er bestimmt, ob beim 
Umschalten in den entsprechenden Modus der Bildschirm 
gelöscht werden soll oder nicht. Löschen kann dabei zwei 
Werte annehmen: 

0 für Bildschirm wird nicht gelöscht 
1 für Bildschirm wird gelöscht 

Wird der Parameter Löschen nicht angegeben, so erhält er 
automatisch den Wert 0, das heißt der Bildschirm wird nicht 
gelöscht. So können Sie mit GRAPHIC problemlos zwischen 
Text und Grafik hin- und herschalten, ohne daß Ihr Grafikwerk 
Schaden nehmen könnte. Geben Sie einmal den Befehl 
GRAPHIC 1,1 

ein. Sofort verschwinden alle Buchstaben und auf dem Moni¬ 
tor zeigt sich ein leerer Bildschirm, auf dem nicht einmal mehr 
der gewohnte Cursor blinkt. Ihr Computer ist dabei nicht, wie 
Sie vielleicht annehmen, abgestürzt, sondern befindet sich 
im Hires-Modus mit einem gelöschten Grafikbildschirm. Der 
Textbildschirm ist nicht mehr aktiv. Doch können Sie wie 
immer Eingaben auf der Tastatur machen. Sie können Sie nur 
nicht sehen, da diese in den Textbildschirm geschrieben wer¬ 
den. Tippen Sie danach (selbstverständlich blind) den Befehl 
zum Rückschalten auf Text ein, 

GRAPHIC 0 

so wird der Grafikbildschirm augenblicklich verschwinden 
und aei übliche Text wieder auf dem Monitor erscheinen. 

Damit sind wir bei einer wichtigen Eigenschaft der Grafik 
auf dem Plus/4. Es können im Normalfall entweder nur der 
Grafik- oder der Textspeicher auf dem Bildschirm sichtbar 
sein. Manchmal ist es aber unumgänglich oder sehr wün¬ 
schenswert, Text und Grafik gleichzeitig zu verwenden. Mit 
etwas Aufwand ist selbst dies zu bewerkstelligen. Durch 
einen programmiertechnischen Trick (allerdings nur in 
Maschinensprache möglich) wird blitzschnell und immer im 
richtigen Moment von Textmodus auf Grafikmodus umge¬ 
schaltet. Durch die Geschwindigkeit erscheinen dann Teile 
beider Bildschirme gleichzeitig auf dem Monitor. 

Doch brauchen Sie sich nicht zu sorgen, daß Sie diesen 
Kniff selbst programmieren müssen. Denn auch dafür hat das 
Basic des Plus/4 vorgesorgt und bietet die Grafikmodi 2 und 4 


Modus 

Bedeutung 

0 

Textbildschirm 

i 

Hires-Modus 

2 

Hires-Modus mit Text 

3 

Mehrtarbenmodus 

4 

Mehrfarbenmodus mit Text 


Bild 3. Modi, die Sie auf »GRAPHIC« einstellen können 


(Bild 3), die es erlauben, Grafik und Text gleichzeitig zu erzeu¬ 
gen. Schalten Sie beispielsweise mit 
GRAPHIC 2 

auf Modus 2, können Sie Folgendes erleben. Der Bildschirm 
teilt sich im wahrsten Sinne des Wortes, wobei Sie im oberen 
Teil die Grafik sehen und in den letzten fünf Zeilen den norma¬ 
len Textbildschirm. Dort können Sie auch, wenn Sie ihn nach 
unten bewegen, den gewohnten Cursor Wiedersehen. Jetzt 
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können Sie zum Beispiel im Direktmodus Grafikbefehle ein¬ 
geben und gleichzeitig auf dem Grafikbildschirm die Resul¬ 
tate mitverfolgen. Die Eingabe ist zwar auch möglich, wenn 
Sie nur den Grafikbildschirm sehen, doch müssen Sie dann 
blind tippen, was natürlich sehr viel schwerer ist. 

Das Problem bei diesem Modus ist aber, daß eben immer nur 
Teile beider Bildschirme sichtbar sind. So ist der untere Teil 
der Grafik wegen des Textbildschirms nicht zu sehen, kann 
aber trotzdem mit den Grafikbefehlen bearbeitet werden. Um 
die gesamte Grafik dann bewundern zu können, muß dann 
wiederauf den normalen Grafikmodus geschaltet werden. Es 
wäre sehr schön, wenn man die Aufteilung von Grafik und 
Text selbst bestimmen könnte, wenn man beispielsweise 
mehr Text darstellen möchte. Dies hat aber das Basic 3.5 des 
Plus/4 leider nicht vorgesehen. Doch gibt es, wie Sie noch 
erfahren werden, eine weitere Methode, Grafik und Text 
gleichzeitig auf den Bildschirm zu bringen. 

Bevor Sie irgendwelche Grafikbefehle anwenden, müssen 
Sie jedoch darauf achten, daß Sie zuvor mindestens einmal 
in einen der vier Grafikmodi geschaltet haben, da dann der 
schon angesprochene Grafikspeicher ab Adresse $1000 
angelegt wird. Ein eventuell vorhandenes Basic-Programm 
verschiebt der Computer selbständig an den neuen Basic- 
Anfang ab Adresse 16384, so daß es nicht verlorengeht. 


Mächtige Grafikbefehle 


Sollten Sie das einmal vergessen, so wird sich der Computer 
bei jedem Grafikbefehl, auf den er trifft, mit einer besonderen 
Fehlermeldung beschweren: 

?1I0 GRAPHICS AREA ERROR C 

Er erinnert Sie daran, daß es noch gar keinen Grafikspei¬ 
cher gibt, da er noch nicht mit einer GRAPHIC-Anweisung 
angelegt wurde. Deshalb sollte der erste Befehl in Ihren Gra¬ 
fikprogrammen immer zuerst die Grafik einschalten. Haben 
Sie dies schon getan, so können Sie alle Grafikbefehle 
anwenden, selbst wenn Sie sich zum Zeipunkt der Ausfüh¬ 
rung im Textmodus befinden. Auf diese Weise kann erst das 
komplette Grafikbild erzeugt werden, während noch Text auf 
dem Monitor zu sehen ist, um schließlich das fertige Bild zu 
präsentieren. 

Sie wissen jetzt, daß durch Angabe des Lösch-Parameters 
in der GRAPHIC-Anweisung der Bildschirm beim Umschalten 
gelöscht werden kann. Wenn Sie sich allerdings schon im 
Grafikmodus befinden und den Bildschirm nachträglich 
löschen, können Sie auch den bekannten Befehl SCNCLR 
verwenden. Er bezieht sich nicht nur auf den Text-, sondern 
auch auf den Grafikbildschirm. SCNCLR löscht dabei immer 
den Bildschirm, der gerade auf dem Monitor aktiv ist. 

Das sind die wichtigsten Befehle, die Sie für die Benutzung 
von Text und Grafik vorab wissen sollten. Wenden wir uns 
jetzt der ersten Grafikart, der hochauflösenden Grafik, zu. 

Geben Sie 
GRAPHIC 1,1 

ein, aktivieren Sie die hochauflösende Grafik des Plus/4. Sie 
können dabei 64000 Punkte einzeln ansprechen. Um dies 
dem Anwender möglichst einfach zu machen, wird der 
gesamte Bildschirm in ein X-Y-Koordinatengitter eingeteilt. 
Durch Angabe der X- und Y-Koordinaten können Sie dadurch 
jeden einzelnen Punkt eindeutig bestimmen. Die X-Achse 
wird dabei von links nach rechts mit dem Wertebereich von 
0 bis 319 festgelegt. Die Y-Achse verläuft, anders als in der 
Mathematik, vom oberen Bildschirmrand nach unten mit der 
Skalierung von 0 bis 199. Sie können somit in X-Richtung 
320 und in Y-Richtung 200 Einzelpunkte ansteuern, woraus 
sich auch die Gesamtzahl der Grafikpunkte ergibt. 


Diese Skalierung wird nun in allen Grafikbefehlen verwen¬ 
det. Wem diese Aufteilung allerdings nicht gefällt, der kann 
die Bereiche der beiden Koordinatenachsen ändern. Dazu 
steht der Befehl SCALE zur Verfügung. Die Syntax ist fol¬ 
gende: 

SCALE (0 oder 1) 

Wählen Sie als Parameter für SCALE den Wert 1, ergibt sich 
eine höhere Skalierung. Sie ermöglicht die Verwendung von 
Werten von 0 bis 1023 in beide Koordinatenrichtungen. 
Selbstverständlich steigt dadurch die Auflösung der Grafik 
nicht auf 1024 mal 1024 ansteuerbare Punkte. Es wird ledig¬ 
lich intern eine Umrechnung der höheren auf die normalen 
Achsenwerte (320 mal 200 Punkte) vollzogen. 

Dies kann beispielsweise bei der Ausgabe von Funktionen 
mit einem großen Definitions- und Wertebereich sehr vorteil¬ 
haft sein. Während Sie mit 
SCALE 1 

die höhere Skalierung einschalten, so können Sie diese 
natürlich wieder rückgängig machen, indem Sie den Parame¬ 
ter 0 setzen: 

SCALE 0 

Bei dieser Einstellung wollen wir auch in diesem Kurs blei¬ 
ben. 

Selbstverständlich sollen die Grafiken auch farbig werden, 
wobei sie wieder die komfortable Farbanweisung COLOR 
verwenden können. Es gibt hierzu allerdings einige Ein¬ 
schränkungen. In Anbetracht der hohen Auflösung können 
pro 8x8-Matrix, aus denen sich wie der Text auch die Grafik 
aufbaut, nur zwei verschiedene Farben benutzt werden. Dies 
ist die Punktfarbe, also die Vordergrund- und die Hintergrund¬ 
farbe. Unterschiedliche 8x8-Kästchen dürfen dabei jedoch 
schon unterschiedliche Farben haben. Wir werden diesen 
kleinen Nachteil in einigen Beispielprogrammen noch erle¬ 
ben, we^n wir in verschiedenen Farben zeichnen wollen. 
Doch zeigen wir erst einmal, wie man überhaupt zeichnen 
kann. 

Die einfachste Art, Grafiken zu erzeugen, ist das Setzen 
einzelner Punkte auf dem Bildschirm. Das ist mit dem Basic- 
Befehl DRAW möglich. Man kann dies mit folgender allgemei¬ 
ner Anweisung erreichen: 

DRAW Farbe,X-Pos,Y-Pos 

Mit Farbe legen Sie dabei fest, in welcher der beiden mögli¬ 
chen Farben der Punkt gesetzt werden soll. Geben Sie 1 an, 
so entspricht das der eingestellten Vordergrundfarbe. Wäh¬ 
len Sie den Wert 0, so ist das die Hintergrundfarbe. Einen in 
Hintergrundfarbe gesetzten Punkt können Sie natürlich nicht 
sehen, da der Hintergrund ja dieselbe Farbe hat. So können 
Sie diesen Punkt als gelöscht betrachten. Er ist nicht mehr 
sichtbar. Farbe gibt also an, ob der Punkt gesetzt oder 
gelöscht werden soll. 0 steht dabei für Löschen und 1 für das 
Setzen des Punktes. 

X-Pos und Y-Pos erklären ihre Funktion schon durch ihren 
Namen. Sie sind die jeweilige X- und Y-Koordinate, an der der 
Punkt gesetzt oder gelöscht werden soll. In Listing 6 wird die 
Verwendung des DRAW-Befehls zum Setzen und Löschen 


10 REM *** DRAW ZUM PUNKTE SETZEN *** 
20 REM *** UND LOESCHEN *** 

25 COLOR 0,2 

30 DEF FN A<X)=RND<TI)*<X+1) 

35 GRAPHIC 1,1 
40 DO 

50 X=FN A(317): Y=FN A(199) 

60 DRAW 1,X,Y 
70 LOOP 

Listing 6. Einfaches Punktesetzen 
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von Punkten demonstriert. Mit COLOR kann beliebig oft die 
Zeichen- und Hintergrundfarbe geändert werden. Auch die 
Helligkeit der einzelnen Punkte kann eingestellt werden. 
Dazu müssen Sie lediglich den dritten Parameter der COLOR- 
Anweisung angeben. Listing 7 ist das etwas modifizierte Pro¬ 
gramm aus Listing 6. Es setzt nun verschiedenfarbige Punkte 
mit unterschiedlicher Luminanz. Hier können Sie schon teil¬ 
weise verfolgen, daß sich innerhalb eines 8x8-Punkte- 
Kästchens nur zwei Farben darstellen lassen. Wird ein Punkt 
mit einer bestimmten Farbe in ein 8x8-Kästchen gesetzt, so 
ändern alle schon darin befindlichen Punkte ihre Farbe und 
Helligkeit in die neue Farbe. 


10 REM *** DRAW 

ZUM PUNKTE SETZEN 

### 

20 REM *** 

UND LOESCHEN 

**# 

25 COLOR 0,1 

30 DEF FN A < X) = 

INT(RND < TI)*(X+1)) 


35 GRAPHIC 1,1 
46 DO 

50 X=FN A(319): 

Y=FN A <199): F=FN 

A <15) + 1« L 

=FN A(7) 



60 COLOR 1,F,Ls 
70 LOOP 

DRAW 1,X , Y 


Listing 7. Ein Farbfehler? 



Sie können die Punkte natürlich auch geordnet setzen, um 
zum Beispiel Funktionen auf dem Bildschirm darzustellen. 
Listing 8 erzeugt mehrere verschiedenfarbige Sinuskurven, 
wobei die eben erwähnte Farbveränderung in den 8x8-Gra- 
fik-Kästchen noch deutlicher zu erkennen ist. 

Eine Besonderheit des Befehls DRAW ist es, daß mit nur 
einer einzigen Anweisung mehrere Punkte gesetzt werden 
können. So ergibt folgende Anweisung zwei Punkte auf dem 
Bildschirm: 

DRAW 1,100,72,30,178 


IO REM *** SINUSKURVEN BUNT *** 

20 COLOR 0,1; GRAPHIC 1,1 
30 DEF FN A(X > =RND <TI)*<X+1) 

40 DO 

50 F=FN A <14)+2: COLOR 1,F,5: W=FN A(10)+4 
60 FOR X=0 TO 319 STEP 0.5 

70 Y-<SIN<X/W>*40>+100 

75 GET A$: IF A*<>"" THEN EX IT 
80 DRAW 1 ,X,Y: NEXT X 
90 LOOP 
100 GRAPHIC 0 

Listing 8. Mathematische Funktionen ohne Aufwand 


Mit diesem Befehl werden zwei Punkte mit den jeweiligen 
Koordinaten (100;72) und (30;178) gesetzt. Die Liste kön¬ 
nen Sie dabei beliebig fortsetzen. Lediglich der Interpreter 
begrenzt diesen Komfort, da er nur Anweisungen mit einer 
Länge bis zu 88 Zeichen erlaubt. 

Es Ist somit zum Beispiel ganz leicht, einen Spiegeleffekt 
zu erzielen, bei dem zwei gleiche Figuren an verschiedenen 
Orten synchron gezeichnet werden. Listing 9 zeigt dies mit 
einer mathematischen Funktion, die auf der der oberen Bild¬ 
schirmhälfte normal und auf der unteren Hälfte spiegelver¬ 
kehrt gezeichnet wird. 

DRAW kann aber nicht nur Punkte setzen. Durch Hinzu¬ 
fügen des Basic-Wortes TO wird auch das Zeichnen von 
geraden Linien zum Kinderspiel. Die erweiterte Syntax hierzu 
lautet: 


10 REM *** DOPPELT ZEICHNEN *-** 
20 COLOR 0,1s GRAPHIC 1,1 
60 FOR X=0 TO 319 STEP 0.5 
70 Y=(SIN(2*C0S(X/9))*40)+50 
75 GET A$: IF A$<>"" THEN 100 
80 DRAW 1,X,Y,X,199—Y: NEXT X 
90 GET KEY A* 

100 GRAPHIC 0 

Listing 9. Spiegelungen 


DRAW Farbe,Xl-Pos,Yl-Pos TO X2-Pos,Y2-Pos 

Farbe ist auch hier wieder der Parameter, der das Zeichnen 
(1) oder das Löschen (0) veranlaßt, wobei dies nun für Linien 
gilt. Die Parameter Xl-Pos und Yl-Pos geben jetzt die 
Anfangskoordinaten der Linie an, die gezeichnet werden soll. 
Hinter TO stehen dann die Koordinaten, die angeben, wohin 
die Linie führen soll. So ziehen wir mit folgendem Befehl eine 
Linie diagonal über den Bildschirm: 

DRAW 1,0,0 T0 319,199 

Listing 10 erzeugt ein Grafikbild, das nur mit Linien gezeich¬ 
net wird, aber doch recht eindrucksvoll ist. Durch Tasten¬ 
druck wird die Zeichenfarbe geändert, wodurch die Farbpro- 
bleme der Hires-Grafik, die wir schon angesprochen haben, 
sehr gut zu sehen sind. 


5 REM *** LINIEN ZIEHEN *** 

10 COLOR 0,1: COLOR 1,2,7 
, r 20 GRAPHIC 1,1 
25 DO 

30 FOR X=10 TO 300 STEP 4 

40 DRAW 1,X,20 TO 300-X,170: NEXT X 

50 GET KEY A* 

60 COLOR 1,INT(RND(TI)*14+2) 

70 LOOP 

Listing 10. DRAW ist auch für Linien gut 


Möchte man vom Endpunkt einer gerade gezeichneten 
Linie eine weitere Linie ziehen, so ist dies sehr einfach zu 
bewerkstelligen. Wir lassen lediglich die ersten Koordinaten 
des Befehls weg und geben nur die Endkoordinaten der 
neuen Linie an. Eine Linie auf die Koordinaten (48;170), die 
an unsere eben gezeichnete Linie anschließt, würde folgen¬ 
den Befehl benötigen: 

DRAW 1 TO 48,170 

Außer in der DRAW-Anweisung selbst können die Anfangs¬ 
koordinaten einer Linie zusätzlich mit LOCATE festgelegt 
werden. Dies geschieht allgemein wie folgt: 

LOCATE Xl-Pos,Yl-Pos 

Ein darauffolgender DRAW-TO-Befehl nimmt die dabei 
angegebenen Koordinaten als Anfangspunkt, sofern sie 
nicht im Befehl selbst neu angegeben wurden. So würde 
unser Beispiel, das eine Diagonale zieht, mit LOCATE folgen¬ 
dermaßen aussehen: 

LOCATE 0,0:DRAW 1 T0 319,199 

Mit diesen Befehlen ist es somit sehr leicht, ein Programm 
zu entwickeln, das eine ähnliche Gestaltung wie bei der 
Turtle-Grafik mancher Computer zuläßt. Bei Turtle-Grafik 
bewegt man eine stilisierte Schildkröte (englisch Turtle) über 
den Bildschirm. Während sie sich bewegt, zieht sie eine Linie 
hinter sich her, die auf dem Bildschirm zu sehen ist. Ähnli¬ 
ches ist nun auch mit dem Plus/4 möglich. 
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1€> REM *** LINIEN ANSCHLIESSEN *** 

20 DEF FN A(X)=INT(RND(TI)*(X+1)) 

25 GRAPHIC 1,1 
27 DO 

30 SCNCLR : LOCATE FN A<319),FN A(199) 
40 DO 

50 DRAW 1 TO FN A(319),FN A<199) 

55 GET Ms IF A*<>"" THEN EXIT 
60 LOOP 

70 COLOR 1,FN A <14)+1 
80 LOOP 

Listing 11. Linien aneinanderhängen 


Das Aneinanderhängen von Linien wurde in dem Demopro¬ 
gramm in Listing 11 zu einem lustigen Effekt verwendet. 

Es ist auch möglich, mehrere TO-Anweisungen in einem 
DRAW-Befehl zusammenzuhängen. Dies läuft nach dem glei¬ 
chen Schema ab, wie wir es bei dem Setzen von Punkten 
erklärt haben. So können Sie auch mehrere Linien synchron 
zeichnen. Anweisungen wie diese sind zum Beispiel ohne 
weiteres erlaubt: 

DRAW 1,10,20 TO 35,108,50,78 TO 34,129 ... 

DRAW 1,24,145 TO 129,97 TO 278,65 TO ... 

Auf diese Weise können Sie viele DRAW-Befehle einspa¬ 
ren, was natürlich einen schnelleren Programmablauf zur 
Folge hat. Sie können beispielsweise geometrische Figuren 
mit nur einer DRAW-Anweisung erstellen. Ein Dreieck könnte 
etwa so programmiert werden: 

DRAW 1,100,100 T0 125,50 T0 150,100 TO 100,100 

In Listing 12 ist als Beispiel eine Routine abgedruckt, die 
ein gleichseitiges Dreieck an die Position (X;Y) mit der Höhe 
h zeichnet. 


IO REM *** GLEICHSEITIGES DREIECK *** 

20 GRAPHIC 2,1 
30 PRINT "<22D0WN>" 

35 DO 

40 INPUT "POSITION";X,Y 
50 INPUT "HOEHE";H 
55 IF(X OR Y OR H>=0 THEN EXIT 
57 S=2*H/SQR<3> 

(£.0 DRAW 1 , X, Y TO X+S/2,Y+H TO X-S/2.Y+H TO X 
,Y 

70 LOOP 
80 GRAPHIC 0 

Listing 12. DRAW Ist zu allem zu gebrauchen 


Lassen Sie doch einmal ein Quadrat zeichnen, wie zum 
Beispiel dieses: 

DRAW 1,100,100 T0 150,100 T0 150,150 T0 100,150 
T0 100,100 

Man muß zugeben, daß eine solche DRAW-Anweisung 
schon recht komplex und unübersichtlich ist. Aus diesem 
Grund wäre es wohl besser, man verwendet zum Zeichnen 
von Quadraten und Rechtecken den sehr vielseitigen Befehl 
BOX, dessen Syntax allgemein wie folgt beschrieben werden 
kann: 

BOX Farbe,XI,Y1,X2,Y2 

Der Parameter Farbe stellt hier das gleiche dar wie bei der 
DRAW-Anweisung. Durch Angabe von 1 oder O wird das 
Rechteck entweder gezeichnet oder gelöscht. XI und Y1 
bezeichnen dabei die linke obere Ecke und X2 und Y2 die 
rechte untere Ecke des Rechtecks. Sie haben also statt den 
vier Eckpunkten des Rechtecks nur zwei Angaben zu 


machen, was wesentlich einfacher ist. So können wir mit 
Leichtigkeit unser obiges Quadrat mit der BOX-Anweisung 
erstellen: 

BOX 1,100,100,150,150 

Nach diesem Befehl erscheint unverzüglich das gleiche 
Quadrat wie zuvor. Die Berechnung der Eckpunkte über¬ 
nimmt hierbei der Computer selbst, was eine viel höhere Zei¬ 
chengeschwindigkeit bedeutet. So werden wir in Verbindung 
mit der BOX-Anweisung noch einen sehr schönen Effekt pro¬ 
grammieren. Doch dazu später mehr. 

Wie Sie auf dem Bildschirm erkennen können, zeichnet der 
BOX-Befehl normale, gerade Rechtecke. Wenn Sie zu den 
schon bekannten Parametern von BOX einen weiteren hinzu¬ 
fügen, ergibt sich daraus eine besondere Eigenschaft des 
Befehls. Hängen Sie einen Winkelparameter an, so wird das 
zu zeichnende Rechteck um diesen Winkel gedreht. Dies ist 
eine verblüffende Möglichkeit, die Sie sicherlich oft gebrau¬ 
chen werden. So können wir unser Quadrat um beispiels¬ 
weise 45 Grad drehen, und wir erhalten eine Raute: 

BOX 1,100,100,150,150,45 

Sie sehen daß durch einen zusätzlichen Parameter der 
Befehl BOX sehr viel vielfältiger wird. Insbesondere durch 
das Drehen eines Rechtecks können schöne Grafiken und 
Muster erzeugt werden. In Listing 13 sehen Sie ein Pro¬ 
gramm, das ein schönes Quadratmuster ohne Drehung 
erstellt. In Listing 14 drehen wir die Quadrate allerdings um 
ihre eigene Achse, wodurch der Eindruck einer in sich win¬ 
denden Spirale entsteht. Wenn Sie das kleine Programm in 
Listing 14 lange genug laufen lassen, können Sie auch hier 
wieder die groben Farbveränderungen miterleben, da immer 
nur zwei verschiedene Farben in einem 8x8-Punkte-Käst- 
chen dargestellt werden können. Sie werden später noch 
sehen, daß sich das Problem umgehen läßt. Beschäftigen wir 
uns aber "och weiter mit der Basic-Anweisung BOX, deren 
Möglichkeiten noch nicht erschöpft sind. 

Bisher konnten wir nur Rechtecke auf dem fv^onitor darstel¬ 
len, die aus Linien bestanden. Der BOX-Befehl ist aber so fle¬ 
xibel, daß er es auch erlaubt, das Rechteck mit einer Farbe 
ausgefüllt darzustellen. Wie bei der Winkelangabe läßt sich 
dies durch einen weiteren Parameter machen. Fügen wir eine 
1 als allerletzten Parameter hinzu, wird das Rechteck mit der 
Zeichenfarbe ausgemalt. So kann man das Quadrat, das vor¬ 
hin um 45 Grad gedreht wurde, auch ausgefüllt zeichnen: 
BOX 1,100,100,150,150,45,1 

Da jetzt mehr Punkte gesetzt werden müssen als bei einem 
leeren Rechteck, geht dies natürlich viel langsamer vonstat¬ 
ten. Das Darstellen von Flächen wird damit wesentlich 

erleichtert. 

Wollen Sie das Rechteck nicht drehen, aber dennoch aus¬ 
füllen, muß der Drehwinkel mit Null angegeben werden. Dies 
können Sie tun, indem Sie eine Null tippen oder gleich die 
zwei Kommata hintereinander schreiben. Zwei aufeinander¬ 
folgende Kommata interpretiert der Computer als den dazwi¬ 
schenstehenden Wert 0: 1 

BOX 1,100,100,150,150,0,1 


10 

REM 

*** QUADRATE *** 

11 

DO 


14 

GRAPHIC 1,1: S=20+RND<TI>*45 

15 

FDR 

Y=25 TD 199 STEP S 

16 

FOR 

X=25 TD 319 STEP S 

20 

FDR 

Z=1 TO 25 STEP 4 

30 

BOX 

1,X+Z,Y+Z,X-Z,Y-Z: NEXT Z,X,Y 

40 

GET 

KEY A*: LDDP 

Listing 13. BOX eignet sich für alle Rechtecke 
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CIRCLE Farbe,X-Pos Mittelp.,Y- 
Pos Mittelp.,Halba. a, 

Halba. b,Bereich Anfang,Bereich Ende 
Bereich Anfang und Bereich Ende sind dabei Winkelanga¬ 
ben, die bestimmen, in welchem Winkelbereich gezeichnet 
werden soll. Bild 5 verdeutlicht den gesamten Winkelbereich 
an einer Zeichnung. 

Soll also beispielsweise nur eine »Halbellipse« auf dem 
Bildschirm erscheinen, so müssen wir, wenn Sie sich Bild 5 
betrachten, als Winkelbereich 0 bis 180 angeben. Nehmen 
wir zu diesem Zweck noch einmal unsere Beispiel-Ellipse von 
oben: 

CIRCLE 1,160,100,50,25,0,180 
Nach Eingabe dieser Anweisung zeichnet der Computer 
jetzt nur die rechte Hälfte unserer Ellipse. Nach gleichem 
Schema können Sie auch Viertel- oder Dreiviertelellipsen 
erstellen. 

Für den Kreis gilt dasselbe, da er ja eigentlich nur eine Son¬ 
derform der Ellipse ist. Geben Sie dazu lediglich für Halb¬ 
achse a und b den Radius des Kreises an, wie zum Beispiel 
folgendermaßen: 

CIRCLE 1,160,100,50,50,0,180 
In diesem Fall wird ein Halbkreis gezeichnet. Sie dürfen 
aber auch der Einfachheit halber den Parameter Halbachse 
b durch ein zweites Komma überspringen. Wie schon bei 
BOX erklärt wurde, setzt der Interpreter dann zur Berech- 


ist äquivalent zu 

BOX 1,100,100,150,150,, 1 

Damit wollen wir uns von den Rechtecken in das Reich der 
runden Formen begeben, und den noch vielseitigeren Befehl 
CIRCLE betrachten. Wie sein Name besagt, handelt es sich 
um einen Befehl, der Kreise (englisch circles) zeichnen kann. 
Doch Sie werden sehen, wie vielfältig dieser Befehl ist, da er 
außer Kreisen auch noch anderes auf den Bildschirm brin¬ 
gen kann. Bleiben wir doch zuerst bei der geometrischen 
Form Kreis. Die Syntax von CIRCLE für einen Kreis ist fol¬ 
gende: 

CIRCLE Farbe,X-Pos Mittelp.,Y-Pos Mittelp.,Radius 

Farbe entscheidet hier wieder, ob gezeichnet oder 
gelöscht werden soll. Danach geben Sie die Koordinaten des 
Kreismittelpunktes und schließlich den Radius, das heißt den 
Abstand vom Mittelpunkt zur Kreislinie, an. Ein Kreis an den 
Koordinaten (177;150) mit dem Radius 50 (das entspricht 50 
Bildschirmpunkten) ist somit schnell erstellt: 

CIRCLE 1,177,150,50 

In Listing 15 sehen Sie ein Programm, das auf sehr einfa¬ 
che Weise konzentrische Kreise zu einem Muster zusam¬ 
menfügt. Doch lassen sich mit CIRCLE nicht nur Kreise 
zeichnen. Indem Sie den Kreis in beide Richtungen verzer¬ 
ren, ist jede beliebige Ellipse darstellbar. Dazu geben Sie statt 
einem Radius nun für die X- und die Y-Richtung quasi unter¬ 
schiedliche Radien an. Bei einer Ellipse heißen diese aber 
nicht mehr Radius, sondern Halbachsen. In Bild 4 ist dies 
deutlich zu sehen. Die modifizierte CIRCLE-Anweisung lautet 
nun folgendermaßen: 

CIRCLE Farbe,X-Pos Mittelp.,Y-Pos Mittelp., 
Halbachse a,Halbachse b 

Anschaulich können die beiden Halbachsen auch als die 
Höhe und die Breite der Ellipse betrachtet werden, was aber 
mathematisch nicht ganz richtig ist. So würde beispielsweise 
CIRCLE 1,160,100,50,25 

eine Ellipse mit den Halbachsen a gleich 50 und b gleich 25 
erzeugen, deren Mittelpunkt M (siehe Bild 4) an den Koordi¬ 
naten (160;100) liegt. 

Wer nur einen Teil eines Kreises oder einer Ellipse braucht, 
der muß nur den Bereich angeben, in dem der Kreis oder die 
Ellipse gezeichnet werden soll: 


Bild 4. Ellipsen mit dem CIRCLE-Befehl. 
a und b sind die Halbachsen 



Bild 5. Kreis- und Ellipsenausschnitte mit Hilfe 
der Winkeiangaben 



10 REM *** KREISE *** 

15 GRAPHIC 1,1 
20 FÜR X=50 TO 319 STEP 50 
30 FOR Y=50 TO 199 STEP 50 
40 FOR Z=1 TO 50 STEP 5 
50 CIRCLE 1,X,Y,Z: NEXT Z,Y,X 
100 GRAPHIC 3: GRAPHIC 1: GOTO 100 
Listing 15. CIRCLE 


10 REM *** DREHUNSEN *#* 

15 DO 

20 GRAPHIC 1,1 
30 FOR Q=1 TO 40 
40 F=RND(TI)*15+1s L=RND(TI)*7 
50 COLOR 1,F,L 

60 FOR X=1 TO 150 STEP 4+RND(TI>*7 

70 BOX 1,160-X,100-X,160+X,100+X,2*X: NEXT X 

80 BET A*s IF A$<>"" THEN EXIT 

90 NEXT Q: LOOP 

100 COLOR 1,1s GRAPHIC 0 

Listing 14. Gedrehte Rechtecke 
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nung automatisch einen Standardwert, der hier der Wert 
von Halbachse a ist. So ist es möglich, obige Anweisung auch 
in dieser Weise zu schreiben: 

CIRCLE 1,160,100,50,,0,180 

Doch damit noch nicht genug. Erweitern wir die Parameter 
des Befehls CIRCLE um einen neuen Wert, können wir 
unsere Ellipsen, wie zuvor die Rechtecke, um den Mittel¬ 
punkt drehen. Dazu fügen wir unserer Parameterliste noch 
Drehwinkel hinzu: 

CIRCLE Farbe,X-Pos Mittelp.,Y-Pos Mittelp., 

Halba. a,Halba. b,Bereich Anfang,Bereich Ende, 
Drehwinkel 

Die Drehung erfolgt dabei genauso wie bei BOX im Uhrzei¬ 
gersinn und gilt für alle bisherigen Variationen von CIRCLE. 
Bei Kreisen ist die Drehwinkelangabe selbstverständlich 
sinnlos, da ein Kreis eine in alle Richtungen symmetrische 
Figur ist und sich bei einer Drehung um den Mittelpunkt nicht 
ändern würde. Die Ellipse, um ihren Mittelpunkt gedreht, kann 
aber herrliche Effekte erzeugen, wie es Listing 16 zeigt. 

Besonders interessant ist dabei, daß auch Ellipsenseg¬ 
mente beliebig gedreht werden können. Ein einfaches Bei¬ 
spiel wäre: 

CIRCLE 1,160,100,50,25,180,360,45 

Diese Parameter würden die untere Hälfte unserer Bei¬ 
spielellipse um 45 Grad im Uhrzeigersinn gedreht darstellen. 
Theoretisch kann somit jede nur erdenkliche Kurvenkrüm¬ 
mung in jeder Stellung auf den Bildschirm gebracht werden. 


10 REM *** ELLIPSEN DREHEN *** 

14 COLOR 0,1: COLOR 1,2 

15 DO 

2« GRAPHIC 1,1 

30 A=150: B=75 

35 DO WHILE A>10 

40 FOR W=0 TO 180 STEP 10 

50 CIRCLE 1,160,100,A,B,,,W 

80 NEXT W 

90 A=A/2: B=B/2 

100 LOOP 

110 FOR Q=1 TO 500: NEXT Q: COLOR 1,RND<TI> 
14+2,4 
120 LOOP 

Listing 16. Auch Ellipsen lassen sich 
in der Ebene drehen 


Doch selbst damit haben wir die Leistungsfähigkeit von 
CIRCLE noch nicht ganz ausgeschöpft. 

Es können zusätzlich noch beliebige Vielecke erzeugt wer¬ 
den. Um die Handhabung zu verstehen, müssen wir jedoch 
zunächst den Begriff des Mittelpunktwinkels eines Vielecks 
klären. Ein kleiner Abstecher in die Geometrie ist dabei 
unumgänglich. 

Wir haben in diesem Bericht schon zwei Vielecke kennen- 
gelernt. Das war zum einen ein Dreieck, das wir mit Hilfe der 
Anweisung DRAW recht kompliziert erzeugt haben und zum 
zweiten das Rechteck. Dieses konnten wir schon einfacher 
mit dem Befehl BOX zeichnen. Doch gibt es in der Geometrie 
noch weitere Flächen, die mehr als vier Ecken haben. Da 
haben wir beispielsweise Fünfecke, Achtecke, Zehnecke 
oder im Extremfall sogar Hundertecke. Die Eckenanzahl ist 
hierbei vollkommen beliebig. Man kann Vielecke jedoch in 
zwei verschiedene Gruppen aufteilen. 

1. die unregelmäßigen Vielecke 

2. die regelmäßigen Vielecke 

Unregelmäßige Vielecke sind Formen, deren Seiten von 
Eckpunkt zu Eckpunkt verschieden lang sein können. Ein 
Beispiel für ein unregelmäßiges Vieleck ist in Bild 6 zu sehen, 
das ein unregelmäßiges Sechseck zeigt. Diese haben meist 


die Eigenschaft, daß sie vollkommen unsymmetrisch sind. 

Anders dagegen die regelmäßigen Vielecke, bei denen alle 
Seiten immer gleichlang sein müssen. In Bild 7 ist nun ein 
regelmäßiges Sechseck dargestellt. Der Unterschied sticht 
dabei gleich ins Auge. Das Sechseck in Bild 7 ist gleichmäßi¬ 
ger und hat gleichgroße Innenwinkel an jeder Ecke. 

Wenn wir nun die Winkelhalbierenden von jeder Ecke in 
Richtung Mitte des Vielecks ziehen, schneiden sie sich alle 
in einem Punkt M, dem Mittelpunkt der Figur. Daraus ergeben 
sich nun weitere Winkel, nämlich die zwischen den einzelnen 
Winkelhalbierenden. In Bild 8 sind die Winkelhalbierenden 
und deren Winkel eingezeichnet. Diese nennt man auch Mit- 



Bild 6. Ein unregelmäßiges Sechseck ist nur mit DRAW zu 
zeichnen 


A a B 



Bild 7. Regelmäßige Sechsecke weisen gleiche Innenwinkel 
und Kanteniängen auf 

telpunktswinkel, da sie am Mittelpunkt des Vielecks anliegen. 
Auch hier können Sie sofort erkennen, daß alle Mittelpunkts¬ 
winkel ebenfalls gleichgroß sind. Bei einem Quadrat, das ein 
regelmäßiges Viereck ist, haben wir vier Mittelpunktswinkel 
zu je 90 Grad. Bei dem Sechseck in Bild 7 sind das sechs 
Winkel zu je 60 Grad. 

Wollen wir mit CIRCLE ein solches regelmäßiges Vieleck 
zeichnen, müssen wir den Mittelpunktswinkel angeben. 
Doch wie kommen wir von der Eckenanzahl, die unser Viel¬ 
eck haben soll, zu diesem besagten Winkel? 

In Bild 8 erkennen wir, daß alle Mittelpunktswinkel zusam- 
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Bild 8. Über den Mittelpunktswinkel konstruieren wir regelmä¬ 
ßige Vielecke aus dem Kreis 

men 360 Grad ergeben. Dies ist bei jedem Vieleck der Fall. 
Da nun jeder Winkel gleichgroß ist, ist es lediglich notwendig, 
die gewünschte Eckenanzahl des zu erzeugenden Vielecks 
durch den Gesamtwinkel von 360 Grad zu dividieren, womit 
wir schon den Mittelpunktswinkel berechnet haben. 

Wir müssen also demnach für den letzten Parameter der 
CIRCLE-Anweisung schreiben: 

360/n 

wobei n die Eckenanzahl ist, die das Vieleck haben soll. Die 
gesamte Anweisung zum Zeichnen eines Vielecks läßt sich 
somit vervollständigen: 

CIRCLE Farbe,X-Pos Mittelp.,Y-Pos Mittelp.»Breite, 
Höhe,Bereich Anfang,Bereich Ende,Drehwinkel, 
360/Ecken 

Die Parameter Halbachse a und Halbachse b wurden dabei 
auf Breite und Höhe umgetauft, da es bei einem Vieleck keine 
Halbachsen mehr gibt. Die Bedeutung ist jedoch dieselbe 
geblieben. Sie geben nun die gesamte Größe des Vielecks 
in X- und Y-Richtung an. Werden sie unterschiedlich gewählt, 
so wird das Vieleck in entsprechender Richtung gedehnt 
oder gestaucht. 

Erzeugen wir aber ein normales Sechseck mit der Größe 
von 50 Punkten, so müssen wir tippen: 

CIRCLE 1,160,100,50,,,,,360/6 
Auch hier sehen Sie wieder, daß nicht benötigte Parameter 
des CIRCLE-Befehls einfach übersprungen werden können. 
Der Computer setzt dann dafür Normalwerte. Wenn wir nun 
dem Parameter Höhe einen eigenen Wert geben, wird das 
Sechseck in Y-Richtung verzerrt: 

CIRCLE 1,160,100,50,30,,,,360/6 
Das Sechseck wirkt nun gestaucht, da es in Y-Richtung nur 
noch 30 Punkte hoch ist. Bei Bedarf kann ein Vieleck eben¬ 
falls gedreht werden. Fügen wir also den Drehwinkel in die 
Parameterliste ein: 

CIRCLE 1,160,100,50,30,,,45,360/6 
So haben wir unser Vieleck um 45 Grad im Uhrzeigersinn 
gedreht. Das Gleiche können Sie nun auch mit einem Vie¬ 
lecksegment machen, wenn Sie die Parameter Bereich 
Anfang und Bereich Ende entsprechend definieren: 

CIRCLE 1,160,100,50,30,90,180,45,360/6 
Jetzt sind sämtliche Parameter eigens definiert und erge¬ 


ben in diesem Fall ein gestauchtes Sechseck, das nur im Win¬ 
kelbereich von 90 bis 180 Grad gezeichnet wird. 

Wenn wir nun abschließend den CIRCLE-Befehl genau 
betrachen, erkennen wir, daß die verschiedenen Formen nur 
durch eine einzige Maschinenroutine erzeugt werden. Es 
handelt sich um ein Programm, das anhand verschiedener 
Daten ein regelmäßiges Vieleck auf dem Bildschirm zeichnet. 
Selbst der Kreis ist ein solches Vieleck, das nur derart viele 
Ecken hat, so daß die Auflösung des Computers nicht mehr 
ausreicht und ein glatter und perfekter Kreis entsteht. Die 
Ellipse wiederum ist nichts anderes als ein verzerrter Kreis. 

Die Vielseitigkeit dieser Befehle besteht also in der großen 
Anzahl von veränderbaren Werten, die das Aussehen des 
Vieleckes beeinflussen. Bild 9 zeigt noch einmal die wichtig¬ 
sten Möglichkeiten von CIRCLE in einer Tabelle aufgelistet. 
Für jeden Fall sind die wichtigen Parameter benannt, die 
dabei unbedingt angegeben werden müssen. Beachten Sie 
auch, daß beim Überspringen von nicht benötigten Werten 
jeweils ein Komma gesetzt werden muß, da sich sonst die 
Parameterliste verschiebt und eine vollkommen andere Figur 
erzeugt wird. Hier ein Beispiel für ein vergessenes Komma: 
CIRCLE 1,160,100,50,30,,,,360/8 
erstellt ein Achteck der Breite 50 und Höhe 30 mit dem Mit¬ 
telpunkt (160;100). Dagegen zeichnet 
CIRCLE 1,160,100,50,30,,,360/8 
eine Ellipse mit den Halbachsen a gleich 50 und b gleich 30, 
die um 45 Grad gedreht ist. Sie fragen sich warum? Nun, im 
zweiten Befehl wurde ein Komma weniger geschrieben. 
Dadurch rutschte der Wert 360/8, der eigentlich den Mittel¬ 
punktswinkel darstellt, in der Liste einen Platz nach vorne, 
wodurch er jetzt als Drehungswinkel interpretiert wird. In 
Anbetracht der großen Parameterzahl von CIRCLE ist es 
wichtig, jeden Wert sorgsam zu durchdenken, um nur 
erw" n ,chte Figuren zu erhalten. Die Tabelle in Bild 9 wird 
Ihnen dabei helfen. 


CIRCLE Farbe,X-Pos,Y-Pos,Radius 

Kreis 

CIRCLE Farbe,X-Pos,Y-Pos,Halb.a,Halb.b 

Ellipse 

CIRCLE Farbe,X-Pos,Y-Pos,Radius 

Kreis- 

Bereich Anfang,Bereich Ende 

segment 

CIRCLE Farbe,X-Pos,Y-Pos,Halb.a,Halb.b, 

Ellipse 

Winkel 

drehen 

CIRCLE Farbe,X-Pos,Y-Pos,Größe,360/Ecken 

Vieleck 


Bild 9. Das alles kann »CIRCLE« und noch viel mehr 


Leider ist es nicht möglich, mit CIRCLE eine ausgefüllte 
Figur zu erzeugen, wie wir das bei BOX können. Dazu benö¬ 
tigt man einen speziellen Grafikbefehl, der dies nachträglich 
tun kann. Er heißt PAINT und wird folgendermaßen benutzt: 
PAINT Farbe,X-Pos,Y-Pos 

PAINT hat nun die Eigenschaft, eine durch Linien abge¬ 
grenzte Bildschirmfläche mit der entsprechend angegebe¬ 
nen Farbe auszumalen. Hierzu dient der schon bekannte 
Parameter Farbe. Ist er 1, geschieht dies mit der Zeichen¬ 
farbe. Sollte er O sein, verwendet er die Hintergrundfarbe. 
Welche Fläche er ausmalen soll, geben wir an, indem wir 
einen Koordinatenpunkt (X-Pos;Y-Pos) wählen, der innerhalb 
der Fläche liegt. 

Auf diese Weise können wir einen gezeichneten Kreis sehr 
einfach ausfüllen, da wir einen Punkt, der ohne Zweifel inner¬ 
halb des Kreises liegt, bereits kennen. Dies wäre der Kreis¬ 
mittelpunkt. Ein ausgefüllter Kreis wird demnach wie folgt 
erzeugt: 

CIRCLE 1,160,100,50 
PAINT 1,160,100 

Entsprechendes gilt auch für Ellipsen und Vielecke. Wenn 
Sie eine unregelmäßige Fläche ausfüllen wollen, brauchen 
Sie ebenfalls irgendeinen Punkt, der innerhalb dieser Fläche 
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liegt. Wichtig ist aber, daß die Fläche auch wirklich durch 
Linien vollkommen abgegrenzt ist. Sollte in der Begrenzung 
nur ein kleiner Punkt fehlen, läuft die Farbe sozusagen aus 
dem Loch heraus und ergießt sich auf weitere Teile des Bild¬ 
schirms, bis sie wieder auf eine Abgrenzung trifft. Haben Sie 
einmal ein solches Loch übersehen und den PAINT-Befehl 
angewandt, können Sie diesen glücklicherweise wieder 
rückgängig machen. Mit 
PAINT 0,160,100 

können Sie den Kreis aus unserem obigen Beispiel wieder 
entfärben, da er nun mit der Hintergrundfarbe ausgefüllt wird. 
Linien, die die gleiche Farbe wie die ausgefüllte Fläche 
haben, werden dadurch ebenfalls gelöscht, das heißt mit der 
Hintergrundfarbe ausgefüllt. Aus diesem Grund verschwin¬ 
det der Kreis vollkommen. So ist diese Methode also nur 
begrenzt verwendbar. Benutzen Sie die PAINT-Anweisung 
sehr vorsichtig, um Ihre Grafikbilder nicht zu zerstören. 

Verschiedene Koordinatenschreibweisen 


An dieser Stelle soll auf eine Besonderheit der Grafikbefehle 
des Plus/4 hingewiesen werden. Bisher arbeiteten wir mit 
einer bestimmten Art der Koordinatendarstellung. So waren 
die Koordinaten, die wir angaben, stets absolut, das heißt ein 
Punkt wurde durch zwei Koordinatenangaben direkt gesetzt. 

Wir haben auch die hervorragende Möglichkeit genutzt, 
daß wir von der letzten Zeichenposition weiterzeichnen 
konnten. Bei dem Anhängen von Linien wurde dies ja demon¬ 
striert. Um dies zu verwirklichen, verwaltet der Computer 
einen Positionsmerker, der immer die Koordinaten des 
zuletzt gesetzten Grafikpunktes beinhaltet. Wird dieser Mer¬ 
ker nicht vorher aktiv verschoben, wird jede weitere Zeichen- 
Operation an diesem Punkt fortgeführt. Wir haben gelernt, 
den Merker an eine beliebige Stelle zu setzen, indem wir 
LOCATE verwenden. 

Das Basic des Plus/4 erlaubt unter Berücksichtigung des 
Merkers auch die Verwendung von relativen Koordinaten. 
Diese sind durch ein vorangestelltes »+« oder»-« gekenn¬ 
zeichnet. Folgende Koordinatenangaben werden dann nicht 
mehr als absolute Koordinaten, sondern relativ verarbeitet: 
DRAW l,+20,-45 

setzt nicht etwa einen Punkt an die Koordinaten (20;-45), 
wenn man sich vergegenwärtigt, daß negative Koordinaten 
gar nicht erlaubt sind. Die absolute Position des Punktes 
ergibt sich vielmehr aus dem Merker plus diesen Werten. 
Befindet sich der Merker beispielsweise auf dem Punkt 
(160;100) wird der Punkt vom Merker aus um 20 Punkte 
nach rechts und um 45 Punkte nach oben verschoben, also 
an die Koordinaten (160 + 20;100-45) gezeichnet. Auch der 
Befehl LOCATE, der den Merker beliebig setzen kann, erlaubt 
relative Koordinaten, wie zum Beispiel: 

LOCATE -40,+25 

wobei er den Merker relativ zu seiner vorherigen Position um 
40 Punkte nach links und um 25 Punkte nach unten versetzt. 

Sie werden sich nun sicherlich fragen, welchen Nutzen 
diese Art der Koordinatenangabe hat. 

Relative Koordinaten werden dort interessant, wo mit Län¬ 
gen und Strecken gearbeitet wird. In bestimmten Fällen kön¬ 
nen bei deren Anwendung komplizierte Berechnungen von 
absoluten Koordinaten wegfallen. 

Polare Koordinatenschreibweise 

Bemerkenswert ist auch, daß wahlweise neben den übli¬ 
chen (kartesischen) Koordinatenangaben auch polare Koor¬ 
dinaten bezüglich des Merkers in den Grafikbefehlen ver¬ 
wendet werden können. So gibt es in der Mathematik zwei 
Möglichkeiten, einen Punkt im Koordinatensystem eindeutig 
zu bestimmen. In Bild 10 ist dies grafisch veranschaulicht. Ein 
Punkt mit der Bezeichnung P kann, wie wir es bis zuletzt prak¬ 


tiziert haben, durch die Werte der X- und Y-Achse Xp und Yp 
bestimmt werden. Diese Koordinaten nennt man auch karte¬ 
sisch. Den gleichen Punkt erhält man, wenn man statt dessen 
die Länge der Strecke I und den Winkel Alpha angibt, wobei 
dies die polaren Koordinatenangaben des Punktes sind. 



Der Interpreter des Plus/4 beherrscht beide Arten. Polare 
Koordinaten müssen statt des gewohnten Kommas durch ein 
Semikolon getrennt werden, wie zum Beispiel so: 

50;45 

So sind in allen Grafikbefehlen des Plus/4 solche polaren 
Koordinatenangaben erlaubt. Um ihre Wirkungsweise zu ver¬ 
stehen, sei hier ein Beispiel aufgeführt: 

DRAW 1,*?; 0,100 T0 40;45 

Die Linie wird nun von dem absoluten Koordinatenpunkt 
(160;100) mit der Länge von 40 Punkten und dem Winkel von 
45 Grad gezeichnet. In Listing 17 werden polare Koordinaten 
verwendet, um ein schönes Muster zu erzeugen. Man hat 
den Eindruck, als ob sich vier Fächer langsam entfalten. 

Beim folgenden Befehl wird im Gegensatz zu oben die 
besagte Linie von der Position des aktuellen Merkers aus 
gezogen: 

DRAW 1 T0 40;45 

Wie Sie sehen, wird gerade der DRAW-Befehl durch die 
Möglichkeit der unterschiedlichen Koordinatensysteme sehr 
flexibel. Insbesondere mathematische Probleme werden 
dadurch besonders erleichtert, da eventuelle Umrechnun¬ 
gen von polaren und kartesischen Koordinaten entfallen. 
Am Anfang wurde das Problem der gleichzeitigen Darstellung 
von Grafik und Text behandelt. Wir haben erfahren, daß bei 
Grafikmodus 2 und 4 (siehe Bild 3) ein Teil des Textbild- 


4 COLDR 0,1 

5 DG 

6 COLGR 1,RND(TI)*15+1 
10 GRAPHIC 1,1 

20 FÜR W=90 TD 100 
30 DRAW 1,0,0 TO 199;W 
40 DRAW 1,319,199 TO 199;W+1B0 
50 DRAW 1,319,0 TO 199;W+90 
60 DRAW 1,0,199 TO 199;W-90 
70 NEXT W 

00 GET KEY AS: LOOP 

Listing 17. Polare Koordinaten mit dem DRAW-Befehl 
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schirms unten eingeblendet wird. Die Möglichkeiten dieser 
Modi sind sehr eingeschränkt, da nur die unteren fünf Bild¬ 
schirmzeilen mit Text versehen werden können. Doch ist es 
manchmal recht vorteilhaft, seine Grafiken direkt zu beschrif¬ 
ten, wenn man beispielsweise einen erklärenden Text hinzu¬ 
fügen oder nur einfach Koordinatenachsen benennen 
möchte. Wir wollen uns nun mit einem Grafikbefehl beschäfti¬ 
gen, der dies verwirklicht. 

Vielleicht haben Sie sich mit diesem Problem schon befaßt 
und sich dabei die Frage gestellt, ob man nicht die Textzei- 
.chen, die ja letztendlich auch nur aus einzelnen Bildschirm¬ 
punkten bestehen, direkt in Grafikpunkte umwandeln und in 
die Grafik einbinden könnte. 

Genau diesen Weg geht der Befehl CHAR. Er ermöglicht 
die Darstellung von allen Zeichen des normalen Textbild¬ 
schirms auf dem Grafikbildschirm. Man könnte ihn auch als 
PRINT-Befehl des Grafikmodus bezeichnen. Die allgemeine 
Anweisung wird folgendermaßen formuliert: 

CHAR Farbe,Spalte,Zeile,String,Revers 

Der Wert der Farbe entscheidet auch hier über die Zeichen¬ 
farbe, das heißt, ob gezeichnet oder gelöscht werden soll. Die 
Parameter Spalte und Zeile geben die Bildschirmposition, ab 
der der Text ausgedruckt werden soll, an. Sie können aller¬ 
dings die Position nicht einzelpunktweise bestimmen, son¬ 
dern nur in dem vorbestimmten Raster, wie Sie es vom nor¬ 
malen Textbildschirm her kennen. Die Werte für Spalte bezie¬ 
hungsweise Zeile dürfen sich aus diesem Grund nur in den 
Bereichen von 0 bis 39 beziehungsweise 0 bis 24 bewegen. 

Der nachfolgende String darf auch eine Variable sein und 
kann fast alle darstellbaren Zeichen enthalten. Leider können 
Sie mit CHAR keine Kleinbuchstaben auf den Grafikschirm 
übertragen, was manchmal sehr wünschenswert wäre. Läuft 
der String beim Ausdruck über den rechten Bildschirmrand 
hinaus, so wird wie im Textmodus in der nächsten Zeile fort¬ 
gefahren. 

Das Revers-Flag am Ende der Anweisung muß nicht unbe¬ 
dingt mit angegeben werden. Wollen Sie jedoch eine reverse 
Darstellung der Zeichen, muß es den Wert 1 erhalten. Auch 
hier darf ein Beispiel nicht fehlen: 

CHAR 1,5,10,"TEXT IN DER GRAFIK IST SEHR 
VORTEILHAFT" 

druckt den String ab der 6. Spalte der 11. Zeile. Beachten Sie 
dabei, daß bei den Spalten und Zeilen mit dem Zählen bei 0 
begonnen wird. So hat die oberste Zeile auf dem Bildschirm 
nicht die Nummer 1, sondern die Nummer 0. Gleiches gilt 
auch bei den Bildschirmspalten. 

Wenn Sie den Befehl CHAR benutzen, müssen Sie sich 
zuvor vergewissern, daß Sie sich im Grafikmodus befinden. 
Denn CHAR ist der einzige Grafikbefehl, der unverständli¬ 
cherweise beim Plus/4 nur dann auf dem Grafikbildschirm 
ausgeführt wird, wenn der Grafikmodus auch aktiv ist. Befin¬ 
den Sie sich im Textmodus, bezieht sich CHAR wie ein nor¬ 
maler PRINT-Befehl auf den Textbildschirm. Dies kann einige 
Verwirrung stiften. Der einzige Vorteil ist, daß Sie damit auch 
im Textmodus einen komfortablen Befehl haben, der einen 
String an eine vorbestimmte Druckposition bringt. Zwei ver¬ 
schiedene Befehle, die sich jeweils auf nur einen Bildschirm 
beziehen, wären dabei jedoch vorteilhafter gewesen. 

Das Beschriften Ihrer Grafiken ist nun also keine Schwierig¬ 
keit mehr. Doch kann die CHAR-Anweisung im Grafikmodus 
gerade in Verbindung mit dem Befehl BOX zu einem netten 
Pseudo-Fenstereffekt verwendet werden. Listing 18zeigtein 
Programm, das dies erzeugt. 

In den Fällen, in denen mehrere Farben zum Zeichnen 
benutzt werden, können Sie beobachten, daß sich im 
Schnittbereich der Farben zeitweise Farbstörungen einstel¬ 
len, da der Hires-Modus, den wir auf den letzten Seiten 
beschrieben haben, inklusive der Hintergrundfarbe nur zwei 
Farben pro 8x8-Punkt zuläßt. Man kann dies umgehen, 


indem man die zweite Grafikart des Plus/4 verwendet. 

Im Mehrfarbenmodus ist es möglich, bis zu vier verschie¬ 
dene Farben in einem 8x8-Zeichen-Kästchen gleichzeitig zu 
erzeugen. Doch hat diese Darstellungsart auch einen gravie¬ 
renden Nachteil: Die Punktauflösung ist nur noch halb so 
hoch wie im Hires-Modus, was bedeutet, daß Sie nur noch 
die Hälfte der 64000 Punkte einzeln ansprechen können. 


Keine Farbprobleme 
im Mehrfarbenmodus 


Daneben wirkt die Grafik auch sehr viel grober, da jeder Punkt 
nun doppelt so breit ist. So verkleinert sich auch die Skalie¬ 
rung der X-Achse auf den Bereich von 0 bis 159. 

Nun bekommen auch die zwei noch nicht beschriebenen 
Farbregister, die bei der Anweisung COLOR zusätzlich mög¬ 
lich sind, eine Bedeutung. Mit 
COLOR Farbnummer,Farbwert,Luminanz 
können die vier Farben gewählt werden, die man in der Grafik 
verwenden will. So kann jede Farbnummer einen eigenen 
Farbwert und Luminanz (Helligkeit) erhalten, wie es im folgen¬ 
dem Beispiel geschieht: 


COLOR 0,1,5 
COLOR 1,6,5 
COLOR 2,10,6 
COLOR 3,2,7 


Hintergrundfarbe Schwarz 
erste Farbe ist Grün 
zweite Farbe ist Orange 
dritte Farbe ist Weiss 


Wie Sie vielleicht schon bemerkt haben, stehen eigentlich 
nur drei Farben zum Zeichnen zur Verfügung. Die vierte Farbe 
ist wieder die Hintergrundfarbe, die man normalerweise ja 
nicht sehen kann. Sie dürfen diesen Farbregistern natürlich 
jederzeit während des Programmablaufs andere Farben 
zuwcLan. Problematisch wird es allerdings erst dann, wenn 
Sie einem 8x8-Kästchen, das schon Punkte in vier Farben 
darstellt, eine fünfte hinzufügen wollen. Die Folgen sind dann, 
ähnlich wie im Hires-Modus, Farbveränderungen innerhalb 
dieses Kästchens. 

Der Mehrfarbenmodus wird ebenfalls mit dem Befehl GRA¬ 
PHIC eingeschaltet. Jetzt wählt man lediglich die Modi 4 oder 
3, je nachdem, ob gleichzeitig Text darstellbar sein soll oder 
nicht. 


GRAPHIC 3,1 

aktiviert den Mehrfarbenmodus, wobei der Bildschirm 
gelöscht wird. Haben Sie die Farbregister nach obigem 


10 REM *** WINDOWEFFEKT *** 

20 GRAPHIC 1,1 
25 DO 

30 SP=10: ZE=6: Sl=SP*8-5: S2=(SP+25)*8+5: Z 
l=ZE*8-5: Z2=(ZE+9)*8+5 
40 BOX 1 ,S1 , Z1,S2 , Z2 
50 RESTORE : FOR Q-0 TO B 
60 READ T*: CHAR 1,SP,ZE+Q,T* 

70 NEXT Q 

75 FOR Q=1 TO 25008 NEXT Q 

80 FOR <2=0 TO 6*8 

90 BOX 0,S1+Q,Z1+Q,S2-Q,Z2-Q 

100 NEXT Q: LOOP 

110 DATA "DIES IST EIN" 

120 DATA "WINDOW-EFFEKT, DER" 

130 DATA "VIELLEICHT AUSBEBAUT" 

140 DATA "WERDEN KANN." 

150 DATA "DAS FENSTER WIRD SICH" 

160 DATA "GLEICH ZUSAMMENZIEHEN" 

170 DATA "UND DEN EINDRUCK MACHEN" 

180 DATA "ALS OB ES VERSCHWINDEN" 

190 DATA "WUERDE." 

Listing 18. Windows? Fast! 
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Muster belegt, können Sie nun mit jeder dieser Farben ein¬ 
zelne Punkte setzen und löschen. Dafür dürfen Sie sämtliche 
Grafikbefehle verwenden, die wir für den Hires-Modus auch 
schon genutzt haben. Während wir für den jeweilig ersten 
Parameter Farbe bei allen Befehlen nur 0 oder 1 wählen konn¬ 
ten, sind nun auch die Farbnummern 2 und 3 für die zusätzli¬ 
chen Farben erlaubt. Der Befehl wird dabei immer in der 
Farbe ausgeführt, die der angegebenen Farbnummer ent¬ 
spricht. So können wir jetzt Punkte in verschiedenen Farben 
setzen: 

DRAW 1,100,20 
DRAW 2,50,67 
DRAW 3,150,95 

Wie bereits vorher schon erwähnt wurde, dürfen Sie aber 
als maximalen Wert für die X-Koordinate statt 319 nur noch 
159 angeben, da lediglich die halbe Auflösung vorhanden ist. 
Listing 19 zeigt den Vorteil der farbigen Punktsetzung. Es 
erzeugt mehrfarbige Sinuskurven, wobei Sie erkennen kön¬ 
nen, daß die Farbänderungen, wie in Listing 9, hier nicht mehr 


10 REM *** SINUSKURVEN MEHRFARBIG *** 

'15 CDLOR 0,1: COLOR 1,6,4: COLOR 2,3,3: COLO 
R 3,7,4 
20 GRAPHIC 3,1 
30 DEF FN A(X)=1+RND(TI> *X 
40 DO 

50 F=INT(FN A(3)): W=FN A(10)+4 

60 FOR X=0 TO 159 STEP 0.5 

70 Y=(SIN(X/W)*40)+100 

75 GET A$: IF At<>"" THEN EXIT 

B0 DRAW F,X,Y: NEXT X 

90 LOOP 

100 GRAPHIC 0 

Listing 19. Sinuskurven in Multicolor 


auftreten. Auch die anderen Grafikbefehle wie BOX, CIRCLE 
und CHAR lassen sich im Mehrfarbenmodus so bedienen, 
wie man es bei der Hires-Grafik schon gewöhnt war. Wir wol¬ 
len an dieser Stelle auch nicht mehr darauf eingehen. Der 
Befehl CHAR hat jedoch kleine Eigenheiten in bezug auf den 
Mehrfarbenmodus. 

Da die Auflösung in X-Richtung nur mehr halb so groß ist, 
erscheinen die Zeichen, die mit CHAR auf den Grafikbild¬ 
schirm gebracht werden, sehr viel grober, wodurch man man¬ 
che Zeichen kaum entziffern kann. Die Verfremdung der 
Buchstaben kann aber auch sehr reizvoll sein, da sie dadurch 
leicht futuristisch angehaucht sind. Zusätzlich hat das Farb- 
register 0 (Hintergrund) eine weitere Aufgabe bekommen. 
Benutzen Sie im CHAR-Befehl die Farbnummer 0, wird der 
String nicht, wie Sie vielleicht annehmen können, in der Hin¬ 
tergrundfarbe auf den Bildschirm gebracht, wodurch wir in 
der Hires-Grafik ein String löschen konnten. Es geschieht 
vielmehr etwas sehr Ungewöhnliches. Der entsprechende 
String selbst erscheint in der Farbe aus Register 1, wobei der 
Hintergrund der Zeichen plötzlich die Farbe aus Register 2 
annimmt. Haben wir beispielsweise die Farbregister folgen¬ 
dermaßen definiert, 

Farbe O ist Schwarz 
Farbe 1 ist Grün 
Farbe 2 ist Orange 
Farbe 3 ist Weiß 
so ergibt der Befehl 
CHAR 0,10,10,"HALLO" 

daß das Wort HALLO an Position (10; 10) in Grün erscheint. 
Der Hintergrund wird orange, wegen des Farbregisters 2. 

Setzen Sie bei Farbnummer 0 das Revers-Flag auf 1, erhält 


der Zeichenhintergrund die Farbe aus Register 3. 

CHAR 0,10,10, "HALLO",1 

gibt das Wort HALLO in der Farbe Grün wieder, wobei der 
Hintergrund jetzt von Register 3 bestimmt und weiß wird. 

Durch diese Besonderheit ist es möglich, Zeichen mit ver¬ 
schiedenfarbigem Hintergrund darzustellen, was im Hires- 
Modus nicht möglich war. Sollen Mehrfarbenzeichen wieder 
vom Bildschirm gelöscht werden, kann dies nur durch einen 
gleichlangen Leerstring geschehen, wie es das folgende Bei¬ 
spiel zeigt: 

CHAR 2,10,10,"BUCHSTABEN" 

überträgt den String BUCHSTABEN auf den Grafikschirm. 
Wollen Sie diesen wieder löschen, geben Sie folgenden 
Befehl ein: 

CHAR 2,10,10," 

Beim Ausfüllen von Flächen mit PAINT muß in bezug auf die 
Farben auch eine Besonderheit beachtet werden, um keine 
bösen Überraschungen zu erleben. So erkennt der PAINT- 
Befehl nur Linien an, die der angegebenen Ausmalfarbe ent¬ 
sprechen. Füllt PAINT gerade eine Fläche etwa in Rosa aus, 
werden Begrenzungslinien der Farbe Grün nicht erkannt und 
das Ausfüllen fortgeführt. Deshalb ist auch gerade im. Mehr¬ 
farbenmodus bei der Benutzung von PAINT Vorsicht gebo¬ 
ten. 

Die Handhabung aller anderen Befehle ist im Mehrfarben¬ 
modus mit der in Hires-Grafik identisch. Um die Wirkung der 
weiteren zwei Farben zu erleben, sind in Listing 20, 21 und 
22 kleine Programme abgedruckt, die ähnliche Muster wie 
zuvor erzeugen. Listing 22 zeichnet ein richtiges Bild. Es soll 
eine Diskette darstellen. 

In Anbetracht der vielen Farbregister, die im Mehrfarben¬ 
modus aktiv sind, kann man schon einmal die Übersicht dar¬ 
über verlieren, welches Register mit welcher Farbe und Hel¬ 
ligkeit b<=i-- jt ist. Die Übersicht wahrend, bietet der Plus/4 
zwei Standardfunktionen an, die daran erinnern. 

RCLR(Farbregister) 

gibt den Farbwert des in Klammem stehenden Farbregisters 


10 REM *** BUNTE KREISE *** 

15 COLOR 0,1: COLOR 1,3,6: COLOR 2,12,3: COL 
OR 3,8,7 

20 DEF FN A(X)=RND(TI)* < X+l> 

25 GRAPHIC 3,1 
30 DO 

40 X=FN A <159): Y=FN A(199): R=FN A(30): F=F 
N A <3) 

50 CIRCLE F,X,Y,R: PAINT F,X,Y 
60 GET A$ 

70 LOOP UNTIL A$< >"" 

80 GRAPHIC 0 

Listing 20. Bel zu vielen Farben wird’s unübersichtlich 


10 REM *** SINUSLINIEN BUNT *** 

15 COLOR 0,1: COLOR 1,6,4: COLOR 2,3,3: COLO 
R 3,7,4 

20 GRAPHIC 3,1 

30 DEF FN A(X)=1+RND(TI)*X 

40 DO 

50 SCNCLR : W=FN A(10>+4 

60 FOR X=0 TO 159 STEP 1.5 

70 Y=(SIN(X/W)*40)+100: F=INT(FN A<3>> 

75 GET A*: IF ASO"" THEN EXIT 
80 DRAW F,0,100 TO X,Y: NEXT X 
90 LOOP 
100 GRAPHIC 0 

Listing 21. Nur vier Farben sind sinnvoll 
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10 REM *** DISKETTE *** 

15 COLOR 0,1a CDLDR 1,3,2: COLOR 2,7,5: COLO 
R 3,2,7 
26 GRAPHIC 3,1 
40 CIRCLE 3,80,100,5 
50 CIRCLE 3,80,100,8 

55 CIRCLE 3,93,105,1 

56 CIRCLE 1,80,128,2,,180,360,90 

57 DRAW 1 TO 84,157 

58 DRAW 1 TO 76,157 

59 DRAW 1 TO 76,129 

60 BOX 1,50,40,110,160 

70 BOX 2,52,44,108,70: PAINT 2,53,45 
80 CHAR 0,14,6,"64ER DISKETTE" 

Listing 22. Zeichnen schnell und einfach 


aus. Die dazugehörige Helligkeit kann mit 

RLUM(Farbregister) 

abgerufen werden. 

Sollte man schließlich so vergeßlich sein und nicht mehr 
wissen, in welchem Grafikmodus sich der Computer befin¬ 
det, kann die Funktion 

RGR(O) 

weiterhelfen. Sie ergibt die Nummer des augenblicklichen 
Modus. Der Wert innerhalb der Klammern ist beliebig und 
wurde hier nur zur einfachen Handhabung mit 0 angegeben. 

Damit verfügen Sie nun auch über das letzte Werkzeug, um 
Grafiken auf dem Bildschirm zu erzeugen. 

Wir wollen aber eine weitere interessante Grafikeigen¬ 
schaft des Plus/4 nicht vergessen. 

Pseudo-Sprites auf dem Plus/4? 


Wenn Sie den Computer C64 kennen, wissen Sie auch 
sicherlich, was Sprites sind. Sprites machen wohl einen gro¬ 
ßen Teil der Grafikfähigkeiten des C 64 aus, da durch sie Teile 
der Grafik sehr schnell hin- und herbewegt werden können. 
So kann man beispielsweise Figuren über den Bildschirm flit¬ 
zen lassen, ohne sich dabei Gedanken zu machen, was mit 
dem Grafikhintergrund passiert. Die Hardware des C64 
macht es möglich, die Sprites unabhängig vom Hintergrund 
zu bewegen, was ein wichtiger Aspekt bei der Programmie¬ 
rung von Grafikspielen ist. Der Plus/4 beherrscht leider keine 
Sprites und ist deshalb auch nicht ganz so hervorragend für 
Spiele geeignet. 

Doch kann zum Verschieben von Grafikteilen eine andere 
Eigenschaft verwendet werden: die Shapes. Ein Shape ist ein 
Ausschnitt aus dem Grafikbildschirm, der an eine beliebig 
andere Stelle kopiert werden kann. Bei der Definition eines 
Shapes in Basic wird der gewünschte Grafikbereich in eine 
normale Stringvariable übertragen, um dann an jeder anderen 
Stelle des Grafikbildschirms wieder in Grafikpunkte umge¬ 
setzt zu werden. Dies geschieht mit zwei Basic-Befehlen. 

Wollen wir einen Grafikausschnitt in eine Stringvariable 
kopieren, benutzen wir die Anweisung SSHAPE, die nach fol¬ 
gendem Muster gehandhabt wird: 

SSHAPE Variable,XI,Y1,X2,Y2 

Als Variable darf hier jede Stringvariable stehen. In dieser 
wird der Grafikbereich abgelegt, der durch die nachfolgen¬ 
den Parameter in seiner Größe bestimmt wird. XI und Y1 
bezeichnen dabei wie bei BOX die linke obere Ecke, während 
X2 und Y2 die rechte untere Ecke des Grafikausschnittes 
darstellen. Sie können somit jeden beliebigen rechteckigen 
Ausschnitt als Shape definieren. Doch darf er nicht beliebig 
groß sein, da ja die Zeichenanzahl einer Stringvariable maxi¬ 
mal nur 255 Zeichen betragen kann. Deshalb sollen Sie an 
dieser Stelle zwei Formeln erfahren, die zum einen für den 


Hires-Modus und zum anderen für den Mehrfarbenmodus 
berechnen, wie lang eine Variable wird, die ein Shape 
bestimmter Größe aufnehmen muß: 

Für Hires: 

Stringlänge = INT((ABS(X1-X2) + 1)/8 + .99)* 

(ABS(Y1-Y2) + 1) + 4 

Für den Mehrfarbenmodus gilt: 

Stringlänge = INT((ABS(X1-X2) + 1)/4 + .99)* 

ABS(Y1-Y2) + 1) + 4 

Haben Sie einen Grafikbereich ausgesucht und sich davon 
überzeugt, daß er nicht zu groß ist, können Sie Ihren Aus¬ 
schnitt in eine Stringvariable legen, wie es beispielsweise bei 
dieser Anweisung geschieht: 

SSHAPE S$,10,10,30,30 

Nehmen wir an, daß wir uns dabei im Hires-Modus befin¬ 
den, können wir errechnen, daß die Stringvariable S$ genau 
79 Zeichen lang wird. Sie sehen, daß der Speicherbedarf 
eines recht kleinen Grafikausschnittes (20 mal 20 Punkte) 
schon sehr groß ist. Die Anwendung der Shapes bei großen 
Grafikbereichen ist deshalb nicht so einfach. So wäre es dann 
möglich, den gewünschten Grafikausschnitt in mehrere Sha¬ 
pes aufzuteilen, was aber umfangreiche Verwaltungen zur 
Folge hätte. 

Nach dem obigen Befehl enthält die Variable S$ nun das 
Bitmuster des gewählten Ausschnittes. Dadurch ergeben 
sich beim Ausdruck mit PRINT verschiedene unverständliche 
Zeichen, die Sie aber nicht weiter stören müssen. Denn mit 
dieser Variable sind Sie jetzt imstande, den übertragenen 
Grafikbereich an jede andere Stelle der Grafik zu setzen. Als 
Gegenstück zu SSHAPE gibt es dafür den Grafikbefehl 
GSHAPE, der sich genau umgekehrt verhält. Das spezielle 
Bitmuster der angegebenen Stringvariable wird nun wieder in 
Grafikpunkte umgesetzt und an beliebige Koordinaten 
gezeichnet. Die allgemeine Anweisung für GSHAPE lautet: 
GSHAPE Variable,X,Y,Wiedergabeart 

Neben dem Variablennamen sind hier lediglich die 
Anfangskoordinaten X und Y nötig, um die linke obere Ecke 
festzulegen, ab der das Shape abgebildet werden soll. Die 
Größe des Shapes steht ja schon durch die vorhergehende 
Definition fest und muß nun nicht mehr angegeben werden. 
Neu hingegen ist der Parameter Wiedergabeart. Mit ihm kann 
bestimmt werden, wie das Shape mit den Hintergrundpunk¬ 
ten verknüpft werden soll. Bild 11 zeigt eine Tabelle der mögli¬ 
chen Wiedergabearten von Shapes. Soll das Shape normal 
abgebildet werden, wobei die darunterliegende Grafik 
gelöscht wird, kann Wiedergabeart auch wegfallen, da dies 
dem Standard entspricht. Wählt man jedoch die Wiedergabe 
1, wird das gesamte Shape in reverser Darstellung auf den 
Bildschirm gebracht, das heißt alle gesetzten Punkte werden 
gelöscht und alle gelöschten Punkte gesetzt. 

Die nächsten drei Wiedergabearten sind aber schon inter¬ 
essanter. Mit ihnen kann das Shape mit dem Hintergrund 
logisch verknüpft werden. Mit Wiedergabeart 2 erreicht man 
ein Überkopieren des Shapes auf dem Hintergrund, wobei 
der Hintergrund vollständig erhalten bleibt. Die UND- 
Verknüpfung der Wiedergabeart 3 erzeugt eine gewisse 
Invertierung, da nun nur die Punkte gesetzt bleiben, die im 
Shape und dem Hintergrund gleichzeitig sichtbar waren. Mit 
Wiedergabe 4 schließlich kann das Shape mit dem Hinter- 


Wiedergabeart 

Bedeutung 

O 

normal, wie definiert 

1 

revers 

2 

ODER-Verknüpfung 

3 

UND-Verknüpfung 

4 

EXOR-Verknüpfung 


Bild 11. Die Wiedergabearten eines Shapes 
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grund Exklusiv-Oder verknüpft werden. Im Gegensatz zum 
normalen ODER werden nun die Punkte gelöscht, die bei 
Shape und Hintergrund gesetzt waren. Es sind also jetzt nur 
die Punkte zu sehen, die entweder nur im Hintergrund oder 
dem Shape gesetzt waren. Auch dies bewirkt eine bestimmte 
Art der Invertierung. Welche Wirkungen mit den verschiede¬ 
nen Wiedergabearten möglich sind, kann am besten durch 
Ausprobieren herausgefunden werden. In Listing 23 wird die 
ODER-Verknüpfung verwendet, um einen Effekt zu erzeu¬ 
gen, der dem von Sprites auf dem C64 ähnlich ist. Es wird 
dabei ein Fadenkreuz erzeugt, welches mit den Cursortasten 
über den Bildschirm bewegt werden kann. Indem der 
ursprüngliche Hintergrund jedesmal beim Kopieren des 
Fadenkreuz-Shapes in ein weiteres Shape gerettet wird, ent¬ 
steht das Gefühl beim Betrachter, als ob das Kreuz vor dem 
Grafikbild gleitet. Durch das ständige Kopieren von Grafik¬ 
speicher in Variable und umgekehrt leidet aber die Geschwin¬ 
digkeit sehr darunter. Zur Animation in Basic sind Shapes also 
nur begrenzt fähig. Es lassen sich aber auch andere schöne 
Bilder mit Shapes erzeugen, wie zum Beispiel das Programm 
in Listing 24 zeigt. Ein gewisser 3D-Effekt ist dabei nicht zu 
leugnen. 

Daß die Shapes in Stringvariablen abgelegt werden, ist 
sicherlich auch mit ein Grund, warum das Programm in Listing 
24 nicht schneller abläuft. Der Vorteil ist aber, daß Stringva¬ 
riable recht einfach in Dateien abgelegt werden können und 
somit auf Diskette speicherbar sind. So können Sie einmal 
definierte Shapes sehr leicht auf der Diskette verwalten. 

Wir sind nun am Ende unseres Streifzuges durch die Gra¬ 
fikwelt des Plus/4, der wohl durch das komfortable Basic 3.5 
mit seinen vielseitigen Grafikbefehlen recht bequem war. 
Doch konnten hier nur Grundlagen aufgezeigt und einige 
schöne Möglichkeiten der Nutzung vorgestellt werden. Die 
wahre Leistungsfähigkeit Ihres Plus/4 werden Sie nur durch 
intensives Ausprobieren erforschen können. Vielleicht hat 
Ihnen dieser Kurs geholfen, die manchmal schier unüber¬ 
windliche Hürde des Einstiegs zu nehmen, um mit viel Übung, 
aber auch Phantasie, herrliche Grafikbilder aus dem Plus/4 
beziehungsweise C16 zu zaubern. 


10 REM **» SHAPES **» 

20 CÜLGR 0,1: CDLOR 1,2: GRAPHIC 1,1 

25 X=160: Y=100: G=2 

26 REM G= GESCHWINDIGKEIT DES KREUZES 

27 FÜR E=0 TO 319 STEP 11: DRAW 1,Q,0 TO Q,1 
99: NEXT 0 

30 GQSUB 200s REM SHAPE DEFINIEREN 
35 SSHAPE F*,X,Y,X+10,Y+10 
40 DO 

45 GSHAPE P*,X,Y,2: X1=X: Y1=Y 

50 P=PEEK <198): IF P-64 THEN G=l: GOTO 50 

60 IF P=43 THEN Y=Y-G: GOTO 110 

70 IF P“40 THEN Y=Y+G: GOTO 110 

B0 IF P=48 THEN X=X-G: GOTO 110 

90 IF P=51 THEN X=X+G: GOTO 110 

100 G“1: GOTO 50 

110 GSHAPE F*,X1,Y1: SSHAPE F*,X,Y,X+10,Y+l0 
120 G=G+1: LOOP 
200 FOR A=1 TO 26 

210 READ W: P»=P*+CHR*(W): NEXT A: RETURN 
220 DATA 4,0,4,0,4,0,4,0,4,0,255,224,4,0,4,0 
,4,0,4,0,4,0,10,0,10,0 

230 REM *#* DIE DATAWERTE FUER DEN PFEIL WUR 
DEN 

240 REM *** ERMITTELT, INDEM EIN KLEINES 
250 REM *** KREUZ GEZEICHENT WURDE UND IN 
260 REM *** EIN SHAPE UEBERTRAGEN WURDE. 

270 REM *** DURCH AUSLESEN DER ASC-WERTE DES 
280 REM *** STRINGS ERGABEN SICH DIE DATEN 
290 REM *********************************** 

Listing 23. »Shapes«, die großen beweglichen Objekte 
des Basic 3.5 


Zum Abschluß hier noch ein kleiner Tip: 

Wenn Sie Ihre Kunstwerke als Grafikbild auf der Diskette 
speichern wollen, können Sie dies über den Maschinenspra¬ 
chemonitor Ihres Plus/4 machen. Dort ist es nämlich möglich, 
mit dem Befehl S beliebige Speicherbereiche und somit auch 
den Grafikspeicher auf Diskette abzulegen. Sie müssen also 
nur tippen: 

MONITOR 

wobei die Monitormeldung erscheint. Dann geben Sie weiter 
ein: 

S"(Name des Bildes)",08,1800,3FFF 

Drücken Sie dann < RETURN > zur Bestätigung, wird der 
gesamte Grafikbildschirm inklusive Färb- und Luminanzwer- 
ten auf Diskette gesichert. 

Nach Abschluß der Aktion gelangen Sie mit dem Kom¬ 
mando X wieder ins Basic zurück: 

X (RETURN) 

worauf das gewohnte READY erscheint. Wollen Sie Ihr Bild 
wieder laden, benötigen Sie den Maschinensprachemonitor 
allerdings nicht mehr. Das Bild darf mit der einfachen Basic- 
Anweisung LOAD wieder in den Speicher geholt werden. Die 
Disketten-Anweisung DLOAD ist dafür jedoch nicht brauch¬ 
bar. Zum Laden tippen Sie nur: 

LOAD"(Narae des Bildes)",8,1 
Damit wird das Bild an die richtige Stelle geladen. Verges¬ 
sen Sie aber nicht, bevor Sie ein Grafikbild laden, den Grafik¬ 
speicher mit GRAPHIC erst zu aktivieren. Denn tun Sie das 
nicht, wird ein eventuelles Basic-Programm vom Grafikbild 
überschrieben. 

Nun aber wünschen wir viel Spaß beim Zeichnen, Malen 
und Einfärben. (Michael Thomas/og) 


IO Rti. *** SHAPEEFEEKT *** 

20 REM *** SHAPE DEFINIEREN ■*** 

30 GRAPHIC 1,1 

40 CIRCLE 1,20,20,18 

50 CIRCLE 1,20,20,9 

60 PAINT 1,20,10 

70 BOX 1,0,0,40,40 

80 SSHAPE KR$,0,0,40,40 

90 REM *** BILDSCHIRMGITTER *** 


100 

SCNCLR 




110 

FOR X=0 TO 

319 

STEP 

10 

120 

DRAW 1,X,0 

TO 

X, 199 


130 

NEXT 




140 

FOR Y=0 TO 

199 

STEP 

10 

150 

DRAW 1,0,Y 

TO 

319,Y 


160 

NEXT 




170 

FOR X=1 TO 

319 

STEP 

20 

180 

FOR Y=1 TO 

199 

STEP 

20 

190 

PAINT 1,X,Y 




200 

NEXT Y,X 




210 

FOR X=11 TO 

319 STEP 

20 

220 

FOR Y=11 TO 

199 STEP 

20 

230 

PAINT 1,X,Y 




240 

NEXT Y,X 




250 

REM *** SHAPES 

VERSCHIEBEN *** 

260 

FOR X=30 TO 

i 230 STEP 

100 

270 

FOR Y=6 TO 

199 

STEP 

66 

280 

FOR Z=0 TO 

16 

STEP 2 


290 

GSHAPE KR$, 

X+Z 

, Y+Z 


300 

NEXT Z,Y,X 




310 

GET KEY A$ 




320 

GRAPHIC 0,0 




Listing 24. Zum Schluß noch ein Effekt mit den Shapes 
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C16, Plus/4 


GRUNDLAGEN 


Wie macht man Musik? 


Ein Spiel ohne Hintergrundmusik oder Sound- 
Effekte wäre sicher ziemlich langweilig. Und da 
der C16 und der Plus/4 (noch?) hauptsächlich 
zum Spielen verwendet werden, darf ein Artikel 
über die Sound-Möglichkeiten dieser Computer 
in so einem Sonderheft nicht fehlen. 

F ür Basic-geübte Leser lassen sich die musikalischen 
Fähigkeiten mit zwei kurzen Sätzen und einem Beispiel 
abhandeln: Der C16 und der Plus/4 verfügen über zwei 
Tonkanäle (Stimmen 1 und 2), von denen der zweite auch als 
Rauschgenerator eingesetzt werden kann (Stimme 3). Die 
Lautstärke wird über 
VOL Lautstärke (0 bis 8) 
eingestellt und der Ton durch 
SOUND Stimme (1 bis 3), Tonhöhe (1 bis 1023), 

Dauer (l bis 65535 in ysostel Sekunden-Abständen) 
ausgelöst. Eine vollständige Tabelle mit allen Tonhöhe- 
Werten finden Sie im Anhang der Bedienungsanleitung. Der 
Kammerton a hat den Wert 770. Ein Beispiel: 

10 REM AUTOHUPE 
20 VOL 8 

30 SOUND 1,770,300 
40 SOUND 2,810,300 

Wer schon einmal die fantastischen Sound-Fähigkeiten 
des C64 erlebt hat, wird sicherlich bitter enttäuscht sein. 
Statt drei nur zwei Tongeneratoren und keine Möglichkeit, 
den Ton in seiner Klangfarbe zu verändern. Man wird sich 
damit abfinden müssen. Musikstücke sollte man aber lieber 
nicht programmieren, da das Ergebnis sogar unmusikalische 
Ohren in Grauen versetzen könnte. 

Eine kleine Melodie 


Für einfache Tonfolgen, wie zum Beispiel eine kleine Melodie, 
wenn man in einem Spiel einen Spielabschnitt geschafft hat, 
genügen die Sound-Möglichkeiten: 

10 VOL 8 
20 READ A,B 
30 IF A=0 THEN END 
40 SOUND 1,A,B:S0UND 2,A-1,B 
50 GOTO 20 

100 DATA 810,10,834,10,854,10 
110 DATA 810,10,834,10,854,10 
120 DATA 810,10,834,10,854,10 
130 DATA 810,10,834,10,854,30 
140 DATA 0,0 
Erklärung: 

Zeile 10: Lautstärke auf 8 (Maximalwert) setzen. 

Zeile 20: Aus den DATA-Zeilen jeweils Tonhöhe und Ton¬ 
dauer einiesen und in den Variablen A und B ablegen. 

Zeile 30: Eine 0 als Tonhöhe ist das Zeichen für »Ende der 
Melodie«. 

Zeile 40: Stimme 1 mit den eingelesenen Werten für Ton¬ 
höhe und Tondauer belegen. Stimme 2 wird mit der gleichen 
Tonhöhe, aber um 1 verringert gestartet. Dieser Effekt wird 
»Schwebung« genannt und erzeugt in der Tat einen »auf- und 
abschwebenden« Ton. Sie können damit ein wenig experi¬ 
mentieren, indem Sie anstatt -1 zum Beispiel -2 verwenden. 

Zeile 50: Wieder zum Einlesen zurückspringen. 

Zeilen 100 bis 140: Hier stehen für jeden einzelnen Ton 
Höhe und Dauer. Ist die Tonhöhe gleich 0 (Zeile 140), erkennt 
das Programm dies als Endekennzeichen. 


Wenn Sie möchten, können Sie auch ein Schlagzeug als 
Begleitung einsetzen. Ändern Sie dazu die Zeile 40 in oben¬ 
genanntem Beispiel: 

40 SOUND 1,A,B:SOUND 3,900,3 
Durch »SOUND 3,...« wird Tongenerator 2 auf Rauschen 
geschaltet. Die verwendete Tonhöhe ist dabei ziemlich egal. 
Probieren Sie für den Wert 900 ruhig einmal andere Zahlen, 
Sie werden kaum einen Unterschied feststellen können. Die 
Tondauer ist mit dem Wert 3 sehr niedrig gehalten, damit das 
Ergebnis wenigstens annähernd einem Schlagzeug ähnlich 
klingt. 

Geräuscheffekte 


Wenn man Sound-Effekte in eigene Spiele einbauen möchte, 
muß man schon etwas Phantasie mitbringen. Die besten 
Klänge erreicht man zweifellos durch die Kombination von 
Stimme 1 und 2. Ein Beispiel dafür (Schwebung) wurde wei¬ 
ter oben gezeigt. 

Ein interessantes Phänomen soll noch kurz erwähnt wer¬ 
den: Wenn Sie einen Ton gestartet haben und gleich danach 
die Tonhöhe ändern wollen, so geht das nicht. Ein Ton muß 
zuerst mit der festgelegten Tondauer zu Ende spielen, 
andernfalls wartet der Computer mit der Ausführung des 
nächsten SOUND-Befehles. Sie können dies leicht auspro¬ 
bieren: Geben Sie VOL 8:SOUND 1,770,1000 ein, drücken 
die RETURN-Taste und ändern dann gleich den Wert 770 in 
zum Taispiel 810. Wird nun < RETURN > gedrückt, stellt 
sich der Computer so lange »tot«, bis der erste Ton mit dem 
Wert 770 ausgeklungen ist. Es hilft auch nicht, wenn Sie den 
Reset-Taster und < RUN/STOP > drücken, der Computer 
wartet beharrlich so lange, bis der Ton zu Ende geklungen ist. 
Nur durch Ausschalten des Computers kommen Sie aus die¬ 
sem Teufelskreis wieder heraus. Wenn Sie einmal als Ton¬ 
dauer den Maximalwert von 65535 eingegeben haben, kön¬ 
nen Sie diesen Tongenerator für die nächsten 21 Stunden 
vergessen, oder müssen den Computer ausschalten. 

Noch ein paar Worte zum VOL-Befehl: Niemals dürfen Sie 
vergessen, die Lautstärke einzuschalten, bevor Sie mit dem 
SOUND-Befehl experimentieren. Selbst uns in der Redaktion 
ist es passiert, daß wir einen Monitorlautsprecher als defekt 
deklarierten, weil er keinen Mucks von sich gab. Wir hatten 
den VOL-Befehl vergessen. 

Übrigens können Sie die Lautstärke verändern, während 
ein Ton gerade erklingt. Auch damit können Sie einige 
brauchbare Effekte erzeugen. Ein Beispiel dazu: 

10 SOUND 1,770,2000 
20 F0R L=1 T0 8:VOL L:G0SUB 100:NEXT 
30 FOR L=7 TO 0 STEP-1:V0L L:G0SUB 100:NEXT 
40 GOTO 20 

100 FOR X=1 T0 20:NEXT:RETURN 
Erklärung: 

Zeile 10: Ton einschalten 

Zeile 20: Lautstärke kontinuierlich von 1 bis 8 erhöhen. 
Durch GOSUB 100 wird eine Warteschleife ausgelöst, damit 
das Ergebnis auch hörbar wird. 

Zeile 30: Wie Zeile 20, nur mit Lautstärkewerten in abstei¬ 
gender Reihenfolge von 7 bis 0. 

Zeile 40: Rücksprung; Endlosschleife 

Zeile 100: Warteschleife für Zeile 20 und 30. 

Wir wünschen Ihnen noch viel Spaß beim Experimentieren. 
Wenn Sie ein gutes Programm zum Thema »C16 und Musik« 
entwickelt haben, schreiben Sie uns! (tr) 
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GRUNDLAGEN 


C16, Plus/4 


Wie ein Ei dem anderen? 

Der Commodore C16, C116 und der Plus/4 sind drei Computer, die in puncto Kompatibilität 
Maßstäbe setzen: Die Programme sind problemlos untereinander austauschbar - oder etwa nicht? 

Wir sind der Sache auf den Grund gegangen. 



A lle drei Computer wurden von Commodore bereits 
1984 auf den Markt gebracht. Ein Preis von damals 
1298 Mark für den Plus/4 schreckte die Käufer zurück, 
zumal in vielen Testberichten zu lesen war, daß die einge¬ 
baute Software nicht mit anderen auf dem Markt befindlichen 
Programmen konkurrieren kann. 

Auch der C16 und C116 wurde damals für ein Vielfaches 
des heutigen Preises verkauft. Seit einiger Zeit erleben aber 
alle drei Computer einen neuen Boom, den niemand voraus¬ 
sehen konnte. Die Pessimisten schrieben die Computer 
bereits vor über einem Jahr ab, denn zuviel sprach dagegen, 
daß sich der enorme Erfolg des C 64 wiederholen sollte: Der 
Preis, die Inkompatibilität zu etablierten Computern wie dem 
C 64 und dem VC 20 und natürlich die Tatsache, daß es kaum 
Software gab. Nachdem sich aber Commodore entschlossen 
hatte, die Preise drastisch zu senken, wurde der Teufelskreis 
(keine Software - wenige Käufer - noch weniger Software 
und so weiter) schnell durchbrochen: Die Computer verkauf¬ 
ten sich über den Preis und wurden dadurch auch für die 
Softwareentwickler interessant. Der ehemals ganz aus den 
Regalen verschwundene Plus/4 entwickelte sich praktisch 
über Nacht zu einem neuen Einkaufshit - kein Wunder bei 
einem Preis von unter 400 Mark (inklusive Floppy-Laufwerk 
1551)1 

Und schon tauchte das nächste Problem auf: Läuft die für 
den C16 erhältliche Software auch auf dem Plus/4? Warum 
läuft ein Programm auf dem originalen CI6, nicht aber auf 
einem ausgebauten mit der 64-KByte-Speichererweiterung? 


Zunächst einmal können wir Ihnen versichern, daß der 
C116 völlig mit dem C16 übereinstimmt. Beide Computer 
unterscheiden sich nur durch Gehäuse, Tastatur und Plati¬ 
nenlayout. Auch die elektronischen Bauteile sind identisch 
und lediglich wegen der Größe des C116 ein wenig anders 
angeordnet. In bezug auf die Software sind die beiden Com¬ 
puter völlig gleich. Wenn in diesem Artikel also vom C16 
gesprochen wird, so gilt dasselbe auch für den C116. 


Enge Verwandtschaft 


Was noch nicht so bekannt und vielleicht auch ein wenig 
überraschend ist: Der C16 ist eigentlich nichts anderes als 
ein abgemagerter Plus/4. Die Hardware des C16 ist mit der 
des Plus/4 praktisch identisch, was fehlt, ist das RAM (16 
KByte gegenüber 64 KByte beim Plus/4), der User-Port mit 
RS232-Schnittstelle und die eingebaute Software. 

Gemeinsam ist den drei Computern der Mikroprozessor, 
der Quartz, der Tastatur-Port, der Videocontroller, das pro¬ 
grammierbare Logik-Array sowie - Sie werden es nicht glau¬ 
ben - die ROMs. Jawohl, das Basic- und auch das Betriebs¬ 
system (»Kernel«)-ROM sind bei allen drei Computern abso¬ 
lut gleich. Das bedeutet aber auch, daß alle Systemadressen 
absolut identisch sind, und dieses heißt wiederum nichts 
anderes, als daß alle PEEK-, POKE- und SYS-Befehle auf 
allen drei Computern dasselbe bewirken. 
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GRUNDLAGEN 


C16, Plus/4 


Doch nicht nur Basic-, sondern auch Maschinensprache¬ 
programme laufen in der Regel unverändert. Auf dem C16 gilt 
das natürlich nur, wenn die vorhandene Speicherkapazität 
nicht überschritten wird und der User-Port beziehungsweise 
die RS232-Schnittstelle nicht angesprochen werden (denn 
beide existieren ja nur beim Plus/4). Doch keine Regel ohne 
Ausnahme: 

Bei einigen Maschinenspracheprogrammen, die ursprüng¬ 
lich für die 16-KByte-Version geschrieben wurden und nun 
auf dem auf 32 oder 64 KByte erweiterten C16 oder auf dem 
Plus/4 arbeiten sollen, gibt es manchmal Probleme. Um dies 
zu ändern, kann man sich eines kleinen, aber recht wirkungs¬ 
vollen Tricks bedienen, auf den später noch eingegangen 
wird. 

Hier möchten wir Ihnen zunächst einmal erklären, warum 
es bei solch ähnlichen Computern wie unseren drei 
Commodore-Modellen zu Problemen kommen kann. 

Dazu ist es wichtig zu wissen, daß das Betriebssystem, 
welches ja bei allen drei Computern identisch ist, beim Ein¬ 
schalten (beziehungsweise bei einem Reset) die Größe des 
RAMs feststellt. Dazu dient die Systemroutine »RAMTAS«, 
die ab Adresse 62290 im ROM steht. Diese Routine erkennt 
drei verschiedene Ausbaustufen: 16 KByte (C16 ohne Spei¬ 
chererweiterung), 32 KByte (C16 mit 16-KByte- 
Erweiterung) und 64 KByte (C16 mit 64-KByte-Erweiterung 
oder Plus/4). 

Ein auf 64 KByte erweiterter C16 ist, abgesehen vom feh¬ 
lenden User-Port und der nicht vorhandenen eingebauten 
Software, absolut identisch mit einem Plus/4. Die Adressen 
0 bis 4096 haben bei allen Versionen die gleiche Belegung 
und auch die Anfangsadresse eines Basic-Programms liegt 
immer bei 4097 dezimal ($1001). Dies gilt aber nur, solange 
der hochauflösende Grafikmodus nicht eingeschaltet ist! 

Der Basic-Speicher reicht jeweils bis kurz vor RAM-Ende: 
Bei der 16-KByte-Version bis 16374 ( = $3FF6), bei der 
32-KByte-Version bis 32758 (=$7FF6) und bei der 
64-KByte-Version bis 64768 (=$FD00). Die Situation 
ändert sich, wenn der Grafikspeicher benutzt wird, der sich 
(bei allen Versionen) von Adresse 6144 (=$1800) bis 
Adresse 16383 (=$3FFF) - also mitten im Basic-Bereich - 
erstreckt. Bei der 16-KByte-Version wird beim Einschalten 
der Grafik einfach das RAM-Ende auf Adresse 6144 herab¬ 
gesetzt. Ist ein eventuell im Speicher stehendes Basic- 
Programm länger als die verbliebenen 2 KByte (6144-4097 
= 2047 Byte), so wird die Fehlermeldung »Out of Memory 
Error« ausgegeben. 

Der Einfluß der Grafik 


Bei der 32- und 64-KByte-Version wird beim Grafik-Aufruf mit 
dem GRAPHIC-Befehl ein eventuell vorhandenes Basic- 
Programm in den RAM-Bereich oberhalb des Grafikspei¬ 
chers ab Adresse 16385 ( = $4001) verschoben. Aber Vor¬ 
sicht: Durch einen Fehler in der Verschiebe- und Anpaßrou¬ 
tine kann es passieren, daß im Programm mittels DEF FN (vor 
dem GRAPHIC-Befehl) definierte Funktionen durcheinander 
geraten. Die erste Programmzeile sollte deshalb immer 
»GRAPHIC1:GRAPHIC0« lauten, was bewirkt, daß das Basic- 
Programm vor der Funktionsdefinition hochkopiert wird. 

Mit dem Befehl GRAPHIC CLR wird der Grafikspeicher wie¬ 
der freigegeben und das Basic-Programm an Adresse 4097 
zurückkopiert. Dies ist auch der Grund, warum man den 
durch Einschalten der Grafik freigewordenen und damit 
unbenutzten Bereich zwischen 4096 und 6143 nicht ver¬ 
wenden sollte (zum Beispiel für Maschinenroutinen), denn 
der GRAPHIC CLR-Befehl überschreibt diesen Bereich beim 
Zurückkopieren rücksichtslos. Hier muß beim Programmie¬ 
ren sehr sorgfältig vorgegangen werden. 


Trotz dieses internen Hin- und Hergeschiebes, von dem 
der Anwender normalerweise nichts merkt, laufen Pro¬ 
gramme in der Regel einwandfrei und unverändert auf allen 
drei Computertypen. 

Probleme kann es mit Programmen geben, die ursprüng¬ 
lich für den C16 ohne Speichererweiterung geschrieben 
wurden. Dies gilt besonders für Maschinensprache- 
Programme mit hochauflösender Grafik (also meist Spiele). 

Läuft ein solches Programm auf Ihrem erweiterten C16 
oder auf Ihrem Plus/4 nicht, so gehen Sie am zweckmäßig¬ 
sten folgendermaßen vor: Geben Sie vor dem Laden des Pro¬ 
gramms im Direktmodus »POKE 1331,246:POKE 
1332,63:SYS 32768« < RETURN > ein. Der Computer mel¬ 
det sich mit »12277 BYTES FREE«, denn das Betriebssy¬ 
stem beziehungsweise der Basic-Interpreter »glaubt« jetzt, 
daß nur 16 KByte RAM zur Verfügung stehen. Dies hat zur 
Folge, daß beim Einschaiten der Grafik das Programm nicht 
in einen anderen Speicherbereich kopiert wird und somit die 
Sprungbefehle des Maschinenspracheprogramms (bezie¬ 
hungsweise die SYS-, PEEK- und POKE-Befehle eines 
Basic-Programms) nicht mehr »falsche« Adressen ansprin- 
gen und damit den Computer »aussteigen« lassen. 

Einfach, aber effektiv 


Mehr können Sie softwareseitig nicht tun, um eine 16-KByte- 
Version zu simulieren. 

Sollte dieser Trick einmal nicht funktionieren, so kann es 
sich (falls kein Fehler im Programm vorliegt) eigentlich nur 
noch um eine kleine Gemeinheit des Programmierers han¬ 
deln: 

Der gesamte RAM-Bereich bei der 16-KByte-Version wie- 
derholtFi'- im Adreßraum des Prozessors vier mal (4 x 16 = 
64), während er ja bei der 32- beziehungsweise 64-KByte- 
Version durchgehend mit verschiedenen Speicherzellen ver¬ 
sehen ist. Das bedeutet, daß bei der 16-KByte-Version zum 
Beispiel die Speicherzelle 0 den Speicherzellen 16384 
(=$4000), 32768 (=$8000) und 49152 (=$C000) ent¬ 
spricht. Besitzerder 16-KByte-Version können es selbst aus¬ 
probieren: POKE 16384+1339,2 (der Cursor wird Rot). 

Benutzt nun ein Programmierer zum Beispiel beim Aufruf 
eines Unterprogramms statt dem Assemblerbefehl »JSR 
$1400« den Befehl »JSR $5400«, so führt dies bei einer 
Nicht-16-KByte-Version zum »Absturz«. 

In diesem Fall gibt es zwei Lösungsmöglichkeiten: Entwe¬ 
der ändern Sie im Programm alle entsprechenden Befehle 
(das ist unter Umständen sehr mühsam und zeitaufwendig), 
oder Sie gehen die Sache von der Hardwareseite an, in dem 
Sie einen Schalter einbauen, mit dem Sie auf 16 KByte 
umschalten können. 

) r_ Zu erwähnen ist außerdem noch, daß es zwei verschie¬ 
dene C16-Versionen gibt, von denen eine beim Gebrauch 
der Systemvariablen DS und DS$ sowie der Basic-Komman¬ 
dos HEADER und SCRATCH gelegentlich abstürzt. Überprü¬ 
fen Sie dies nach folgender Methode: Geben Sie NEW ein, 
anschließend PRINT FRE(O) und merken Sie sich den ausge¬ 
gebenen Wert. Fragen Sie nun mit PRINT DS$ den Fehlerka¬ 
nal ab und danach wieder mit PRINT FRE(O) den freien Spei¬ 
cherplatz. Ist der Wert um 42 kleiner geworden, so besitzen 
^ Sie die korrigierte C16-Version. 

Abschließend läßt sich sagen, daß man die drei Computer 
CI6, C116 und Plus/4 guten Gewissens als kompatibel 
bezeichnen kann. Eventuell auftretende Schwierigkeiten 
sind verhältnismäßig einfach und elegant zu lösen, und ein 
Programmierer muß sich schon anstrengen, wenn er ein Pro¬ 
gramm schreiben will, das auf einem dieser Computer läuft, 
auf dem anderen aber nicht. 

(Pd) 
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CKoUT 

/// 


OPEN 


4 CHKIN 


^ BSouT 


Kemel komplett - Alle Routinen 
des C16, C116 und Plus/4 


Das Betriebssystem ist das Herz Ihres Computers. 
Anhand vieler Beispiele demonstrieren wir die 
Funktionsweise aller relevanten Routinen. 

Z unächst sollten Sie sich im klaren sein, daß dieser Arti¬ 
kel auf Maschinensprachekenntnissen aufbaut. Ohne 
entsprechende Vorkenntnisse sollten Sie lieber die Fin¬ 
ger von den Betriebssytemroutinen lassen. Es können zwar 
viele Routinen ohne weitere Vorarbeiten mit dem SYS-Befehl 
aufgerufen werden, doch in der Regel stürzt der Computer 
bei unsachgemäßer Behandlung ab. Das eventuell vorhan¬ 
dene Programm ist dann unter Umständen zerstört. 

Also Vorsicht beim Umgang mit den Kernel-Routinen! 

Die wichtigsten 39 Betriebssytemroutinen des C16, C116 
und Plus/4 können über die Kernel-Sprungtabelle am Ende 
des Betriebssystems erreicht werden. Hier finden sich im 
wesentlichen Standardroutinen für die Ein-/Ausgabe und 
Speicherverwaltung des Betriebssystems. Da fast jeder 
Commodore-Computer ein anderes Betriebssytem besitzt, 
ist es in der Regel sehr mühsam und zeitaufwendig, Maschi¬ 
nenprogramme von einem auf den anderen Computer umzu¬ 
schreiben. Vor allem, wenn das Programm die spezifischen 
Routinen des Computers direkt anspringt. Verwendet das 
Programm ausschließlich Routinen, die über die Kernel- 
Sprungtabelle erreicht werden, stehen die Chancen gut, Pro¬ 
gramme an andere Commodore-Computer anzupassen, weil 

diese in der Regel die gleiche Kernel-Sprungtabelle besit¬ 
zen. Bei allen Commodore-Computern liegt die Kernel- 
Sprungliste in der letzten Page des Betriebssytems (65409 
bis 65526 beziehungsweise $FF81 bis $FFF6). Die Com¬ 
puter C16, C116 und Plus/4 besitzen zusätzliche Sprungta¬ 


bellen für Optionen, die bei den älteren Commodore- 
Modellen nicht vorhanden waren. Auch diese Routinen 
werden später ausführlich behandelt. 

Beim Erstellen von Maschinenprogrammen empfiehlt es 
sich, schon alleine um Zeit und Platz zu sparen, die vorhande¬ 
nen Routinen des Betriebssytems zu nutzen. Diese Routinen 
können natürlich direkt angesprungen werden, wenn man 
weiß, wo sich diese befinden. Dazu ist allerdings ein ausführ¬ 
lich dokumentiertes ROM-Listing erforderlich. Daraus läßt 
sich ersehen, welche Vorarbeiten geleistet werden müssen, 
um zum gewünschten Ergebnis zu gelangen. Ein entspre¬ 
chendes ROM-Listing für den CI6, C116 und Plus/4 wird 
demnächst vom Markt&Technik Verlag angeboten. 

Die meisten Routinen verlangen folgende Arbeitsschritte: 

1) Übergabe der Parameter oder Adressen 

2) Aufruf der Routine 

3) Gegebenenfalls Fehlerbehandlung 

Dieser Artikel gibt genaue Auskunft über die nötigen 
Schritte zum Aufruf der Kernelroutinen. Zunächst sollen alle 
39 Kernelroutinen (Tabelle 1) genau erklärt werden. 

Die 39 Kernel-Sprungadressen 


CINT (SFF81 / 65409): Diese Routine initialisiert den TED- 
Chipundden Bildschirm-Editor. Sie kann ohne jegliche Vorar¬ 
beiten mit »JSR $FF81« oder SYS 65409 aufgerufen wer¬ 
den. 

IOINIT (SFF84 / 65412): Mit »IOINIT« werden alle Ein-/Aus- 
gabe-Bausteine und Routinen initialisiert. Da auch hier keine 
Parameter verlangt werden, kann die Routine mit »JSR 
$FF84« oder SYS 65412 aufgerufen werden. 
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Einsprung- 

Adresse: 

Sprung nach 
Adresse: 

Label 

Funklion 

$1181 

JMP $dB4e 

CINT 

Initialisiert TED-Chip und Bildschirmeditor 

S((84 

JMP $!30b 

IOINIT 

Initialisiert Ein-/Ausgabe-Bausleine und Roulinen 

$1187 

JMP $1352 

RAMTAS 

Initialisiert RAM-Bereich und Funklionslasten 

$ll8a 

JMP $l2co 

RESTOR 

Betriebssytem-Vektoren einrichten 

$ff8d 

JMP $12d3 

VECTOR 

Vektor-Adressen kopieren und verändern 

$1190 

JMP $!4la 

SETMSG 

Ausgabe von System- und Fehlermeldungen 

$1193 

JMP See4d 

SECOND 

Übergabe der Sekundäradresse nach LISTEN 

$1196 

JMP Seela 

TKSA 

Übergabe der Sekundäradresse nach TALK 

$1199 

JMP $1427 

MEMTOP 

Zeiger (ür RAM-Ende setzen oder holen 

$H9c 

JMP $1436 

MEMBOT 

Zeiger (ür RAM-Anlang selzen oder holen 

$1191 

JMPSdbll 

SCNKEY 

Tastatur ablragen 

$Ua2 

JMP SI423 

SETTMO 

TIMEOUT-Flag selzen oder löschen (lEEE-Bus) 

$lta5 

JMP Sec8b 

ACPTR 

Liesl Daten vom seriellen Bus 

$lla8 

JMP Secdl 

CIOUT 

Gibt Byte über den seriellen Bus aus 

SKab 

JMP $el3b 

UNTLK 

Beendei Datenübertragung (UNTALK) 

$llae 

JMP $e!23 

UNLSN 

Beendet Datenempfang (UNLISTEN) 

$1lb1 

JMP $oo2c 

LISTEN 

Gerät für Datenemplang vorbereiten 

$llb4 

JMP $edla 

TALK 

Gerät lür Datentransport vorbereiten 

$flb7 

JMP SI41c 

READST 

Ein-/Ausgabestatus lesen 

Sllba 

JMP $1413 

SETLFS 

Logische Datei einrichten 

$flbd 

JMP $!40c 

SETNAM 

Übergibt Dateiname lür OPEN, SAVE oder LOAD 

SIfcO 

JMP ($0318) 

OPEN 

Öltnet eine logische Datei 

$1lc3 

JMP (S031a) 

CLOSE 

Schließt eine logische Datei 

$llc6 

JMP (S031C) 

CHKIN 

Setzt Eingabegerät 

$Hc9 

JMP (S031e) 

CKOUT 

Setzt Ausgabegerät 

Sllcc 

JMP ($0320] 

CLRCH 

Schließt alte Ein-/Ausgabekanäle 

$f(cf 

JMP ($0322) 

BASIN 

Eingabe eines Zeichens 

S(1d2 

JMP ($0324) 

BSOUT 

Ausgabe eines Zeichens 

Sfldß 

JMP $1043 

LOAD 

File laden (LOAD) oder Überprüfen (VERIFV) 

$lfd8 

JMP $f194 

SAVE 

File speichern (SAVE) 

Slldb 

JMP $cf2d 

SETTIM 

Selzt Timer (TI) 

Sdde 

JMP $cl26 

RDTIM 

Liest Timer (TI) 

$lle1 

JMP ($0326) 

STO 

Prütt STOP-Taste 

S1le4 

JMP ($0328) 

GETIN 

Holl Zeichen 

$lle7 

JMP ($032a) 

CLALL 

Schließt alle otlenen Dateien 

Sllea 

JMP ScelO 

UDTIM 

Aktualisiert Systemzeit 

$Hed 

JMP Sd834 

SCREEN 

Holt Bildschirmlormat 

$1110 

JMP Sd839 

PLOT 

Cursorposition selzen/holen 

$11(3 

JMP S(c19 

I0BASE 

Adresse der Ein-iAusgaberegister ermitteln 


Tabelle 1: Alle 39 Kernelroutinen mit Label und Bedeutung 


RAMTAS ($FF87 / 65415): Die »RAMTAS«-Routine initiali¬ 
siert das RAM des C16, C116 und Plus/4 und setzt entspre¬ 
chend die Zeiger für den zulässigen RAM-Bereich des Com¬ 
puters. Zusätzlich werden die Funktionstasten programmiert, 
die RAM-Laderoutine und die Farbcodes ins RAM kopiert. 
Diese Routine kann nicht ohne weiteres aufgerufen werden, 
da die gesamte Zeropage gelöscht wird und somit der Basic- 
Interpreter nicht mehr lauffähig ist. Diese Routine wird vom 
Betriebssytem bei einem Reset aufgerufen. 

RESTOR ($FF8a / 65418): Diese Routine korrigiert die 
Adressen der wichtigsten Betriebssystem-Vektoren im 
Bereich von $0312 bis $0331. Auch diese Routine läßt sich 
ohne weiteres aufrufen (JSR $FF8a oder SYS 65418). 

VECTOR ($FF8d / 65421): Mit dieser Routine lassen sich 
die wichtigsten Betriebssytem-Vektoren (Bereich $0312 bis 
$0331) beliebig ändern. Ist beim Aufruf der Routine Carry 
gleich 1, so werden zunächst alle Vektor-Adressen in den 
Speicherbereich kopiert, dessen Adresse im (X-Register, Y- 
Register) gespeichert ist. Ist das Carry-Bit gelöscht, wird der 
Vorgang umgekehrt. Also Vorsicht mit diesem Befehl! Zeigen 
(X-Register, Y-Register) nicht auf eine Tabelle mit sinnvollen 
Vektor-Adressen, so führt dies unweigerlich zum Absturz des 
Computers. Unser kleines Beispielprogramm (Listing 1) ver¬ 
tauscht die OPEN- und CLOSE Vektoren, indem die Vektor- 
Adressen nach $2050 kopiert, dort geändert und anschlie¬ 
ßend wieder zurückkopiert werden. Nach dem Starten der 
Routine mit SYS 8192 können Sie ihren Drucker folgender¬ 
maßen aktivieren: 

CLOSE 1,4 : CMD 1 : LIST etc. 

Es empfiehlt sich, nach diesem Beispielprogramm den 
Computer auszuschalten oder einen Reset durchzuführen, 
da durch Veränderung der beiden Vektoren der Basic- 
Interpreter nicht mehr einwandfrei arbeitet. 

. 2000 a2 50 ldx #$50 Tabelle nach Adresse 

. 2002 aO 20 ldy #$20 ... $2050 kopieren 

. 2004 38 sec Carry = 1 

54 


. 2005 

20 

8d 

ff 

jsr 

$ff8d 

Vektoren kopieren 

. 2008 

a9 

5d 


lda 

#$5d 

0PEN- 

. 200a 

8d 

56 

20 

sta 

$2056 

... und 

. 200d 

a9 

ee 


lda 

#$ee 

... CLOSE- 

. 200f 

8d 

57 

20 

sta 

$2057 

... Vektoren 

. 2012 

a9 

53 


lda 

#$53 

... vertauschen 

. 2014 

8d 

58 

20 

sta 

$2058 


. 2017 

a9 

ef 


lda 

# $ef 


. 2019 

8d 

59 

20 

sta 

$2059 


. 201c 

a2 

50 


ldx 

#$50 


. 201e 

aO 

20 


ldy 

#$20 


. 2020 

18 



clc 


Carry = 0 

. 2021 

20 

8d 

ff 

jsr 

$ff8d 

(VECTOR) Vekto. einrichten 

. 2024 

60 



rts 


ENDE 


Listing 1: Beispielprogramm (VECTOR) 


SETMSG ($FF90 / 65424): Die »SETMSG«-Routine erlaubt 
es, System- und Fehlermeldungen beliebig zu variieren oder 
gar zu unterdrücken. Unter Fehlermeldungen versteht man 
Meldungen wie »I/O ERROR #«. Systemmeldungen sind 
Kommentare wie »LOADING« etc. Vor Aufruf der Routine muß 
der Akku mit entsprechendem Kode belegt werden. Der Auf¬ 
ruf erfolgt also folgendermaßen: 

LDA #$.. 

JSR $FF90 

Folgende Kombinationen lassen sich durch Aufruf der Rou¬ 
tine mit entsprechender Belegung des Akkumulators einstel¬ 
len: 


Akku 

Fehlermeldung 

Systemmeldung 

$00 

ein 

ein 

$40 

aus 

ein 

$80 

ein 

aus 

$CO 

aus 

aus 


Tabelle 2: Auswahl der Meldungen 


SECOND ($FF93 / 65427): Über diese Routine wird eine 
Sekundäradresse zu einem Ein-/Ausgabegerät übertragen. 
Voraussetzung ist der Aufruf der LISTEN-Routine. Das Ein-/ 
Ausgabegerät ist anschließend empfangsbereit. Die Routine 
kann nicht zur Übertragung einer Sekundäradresse nach 
dem Aufruf der TALK-Routine benutzt werden! Als Vorarbeit 
muß zunächst die Gerätenummer mit 96 ODER-verknüpft 
und die LISTEN-Routine ($FFB1) aufgerufen werden. Erst 
dann kann die Sekundäradresse in den Akku geladen und die 
SECOND-Routine aufgerufen werden (Listing 2). 


. 2000 

a9 08 

lda #$08 

Geräteadresse 8 


. 2002 

05 60 

ora $60 

ODER-Verknüpfung 

mit 96 

. 2004 

20 bl 

ff jsr $ffbl 

LISTEN-Routine 


. 2007 

a9 Of 

lda #$0f 

Sekundäradresse 

15 

. 2009 

20 93 

ff Jsr $ff93 

SECOND-Routine 


. 200c 

60 

rts 

ENDE 



Listing 2: Beispielprogramm für »SECOND« 


TKSA ($FF96 / 65430): Diese Routine hat ebenfalls die Auf¬ 
gabe, eine Sekundäradresse an ein Ein-/Ausgabegerät zu 
übertragen. Die Routine ist aber im Gegensatz zu der 
SECOND-Routine dafür ausgelegt, eine Sekundäradresse 
über den seriellen Bus zu einem TALK-Gerät zu übertragen. 
Vor Aufruf der Routine ist unbedingt die TALK-Routine zu 
benutzen und der Akku mit dem Sekundäradreßbefehl zu 
belegen. Auch hier muß der Befehl mit 96 ODER-verknüpft 
werden. Die »TKSA«-Routine ist nach LISTEN unwirksam! Im 
folgenden Beispielprogramm wird an das Gerät 4 über den 
seriellen Bus die Sekundäradresse 7 gesendet (Listing 3). 
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. 2000 a9 04 lda #$04 

. 2002 20 b4 ff jsr $ffb4 

. 2005 a9 07 lda #$07 

. 2007 09 60 ora #$60 

. 2009 20 96 ff jsr $ff96 

.'200c 60 rts 


Gerätenummer 4 
TALK-Routine 
Sekundäradresse 7 
ODER-Verknüpfung mit 96 
TKSA-Routine 
ENDE 


Listing 3: Beispielprogramm für »TKSA« 


MEMTOP ($FF99 / 65433): Diese Routine hat zwei Funktio¬ 
nen. Ist beim Aufruf das Carry-Bit gesetzt, wird das RAM- 
Ende ausgelesen und an das X- und Y-Register übergeben. 
Ist Carry hingegen O, wird das RAM-Ende auf den Wert des 
X- und Y-Registers gesetzt und somit der Speicherbereich 
verkleinert oder vergrößert. Das Beispielprogramm (Listing 
4) liest das RAM-Ende aus und gibt dieses als Integer-Wert 
auf den Bildschirm aus. Wird das Programm zum Beispiel im 
Plus/4 mit SYS 8192 gestartet, erscheint die Zahl »64768« 
auf dem Bildschirm. Das heißt, der RAM-Bereich des Plus/4 
reicht bis SFDOO. 

Beispielprogramm 5 (Listing 5) setzt zuerst das RAM-Ende 
auf $2000 und gibt dann ebenfalls wie Listing 4 das RAM- 
Ende als Integerzahl (8192) aus. Auch dieses Programm wird 
mit SYS 8192 gestartet. 


. 2000 

38 

sec 

Carry = 1 (für lesen) 

. 2001 

20 99 

ff jsr $ff99 

MEMTOP (RAM-Ende lesen) 

. 2004 

98 

tya 

Ergebnis nach AkRu, 
X-Register 

. 2005 

20 5f a4 jsr $a45f 

Integerwert ausgeben 

. 2008 

60 

rts 

ENDE 

Listing 4: RAM-Ende auslesen und ausgeben 

. 2000 

a2 00 

ldx #$00 

RAM-Ende 

. 2002 

aO 20 

ldy #$20 

... auf $2000 setzen 

. 2004 

18 

clc 

Carry = 0 (für setzen) 

. 2005 

20 99 

ff jsr $ff99 

(MEMTOP) RAM-Ende $2000 

. 2008 

38 

sec 

...wie Listing 4... 

. 2009 

20 99 

ff jsr $ff99 


. 200c 

98 

tya 


. 200d 

20 5f a4 jsr $a45f 


. 2010 

60 

rts 



Listing 5: RAM-Ende auf $2000 setzen und auslesen 

MEIWBOT($FF9C / 65436): Diese Routine ist äquivalent zur 
MEMTOP-Rbütine: Hier wird lediglich der RAM-Anfang gele¬ 
sen oder neu.festgelegt. Listing 4 und 5 lassen sich also auch 
hier anwenden. Es müssen nur die Sprungadressen von 
$FF99 aut $FF9C geändert werden. 

SCNKEY ($FF9F / 65439): Diese Routine stellt fest, wel¬ 
che Taste gedrückt ist und schreibt diese als ASCII-Wert in 
den Tastaturpuffer. Bevor diese Routine angesprungen wird, 
sollten mit IOINIT die Ein-/Ausgabebausteine initialisiert wer¬ 
den. 

Unser kleines Beispielprogramm (Listing 6) holt zunächst 
die aktuelle Taste in den Tastaturpuffer. Mit »GETIN« wird die 
Taste als ASCII-Code aus dem Tastaturpuffer in den Akku 
übertragen. Wurde keine Taste gedrückt, so wird erneut die 
Tastatur abgefragt. Ansonsten wird das ensprechende Zei¬ 
chen mit »BSOUT« am Bildschirm ausgegeben. Das Pro¬ 
gramm wird mit SYS 8192 gestartet und mit der STOP-Taste 
unterbrochen. 


. 2000 20 9c ff jsr $ff9c 
. 2003 20 e4 ff jsr $ffe4 
. 2006 fO f8 beq $2000 
. 2008 20 d2 ff jsr $ffd2 
. 200b c9 03 cmp #$03 
. 200d dO fl bne $2000 
. 200f 60 rts 


(SCNKEY) holt Taste 
(GETIN) ASCII-Code in Akku 
Keine Taste?, dann nochmal 
(BSOUT) Zeichen ausgeben 
STOP-Taste ? 

Nein, dann weiter 
ENDE 


Listing 6: Beispielprogramm zur Tastaturabfrage mit der 
»SCNKEY«-Routine 


SETTMO (SFFA2 / 65442): »SETTMO« setzt das TIMEOUT- 
Flag für den lEEE-Bus. Diese Routine funktioniert natürlich 
nur bei angeschlossenen Peripheriegeräten mit lEEE-Bus 
und einem entsprechenden Interface für den C16, C116 und 
Plus/4. Diese Routine erinnert sozusagen an die alten CBM- 
Computer (CBM 20xx, 30xx, 40xx oder 80xx). Für diese 
Geräte existierten ausschließlich Peripheriegeräte mit lEEE- 
Bus. Bei gesetztem TIMEOUT-Flag wartet der Computer 64 
Millisekunden auf die Meldung eines Gerätes am lEEE-Port. 
Antwortet kein Peripheriegerät, erkennt der Computer einen 
Fehler und verläßt die Handshake-Sequenz. Das TIMEOUT- 
Flag wird gesetzt, wenn vor Aufruf der Routine Bit 7 des 
Akkumulators gelöscht ist. Ist Bit 7 gesetzt, so sind keine 
TIMEOUTs wirksam. 

ACPTR ($FFA5 / 65445): Mit der »ACPTR«-Routine lassen 
sich Daten vom seriellen Bus, zum Beispiel von der Disket¬ 
tenstation, lesen. Es kann direkt ein Datenbyte vom seriellen 
Bus gelesen werden. Zur Vorbereitung muß die TALK- 
Routine und eventuell die TKSA-Routine aufgerufen werden. 
Mit TALK wird der serielle Bus für die Datenübertragung akti¬ 
viert. Die TKSA-Routine wurde bereits oben erklärt. 

Nach Aufruf der »ACPTR«-Routine steht das aktuelle 
gerade am seriellen Bus anliegende Byte im Akku und kann 
dort bearbeitet werden. 

CIOUT ($FFA8 / 65448): Mit dieser Routine kann ein Byte 
direkt an den seriellen Bus übergeben werden. Durch Aufruf 
dieser Routine wird der Inhalt des Akkus auf dem seriellen 
Bus mit »handshake«-Signalen übertragen. Als Vorbereitung 
muß die LISTEN-Routine aufgerufen werden. Bei Angabe 
einer Sekundäradresse muß zusätzlich die SECOND- 
Routine (oben besprochen) angesprungen werden. Ist das 
angesprochene, serielle Gerät nicht für den Datenempfang 
vorbc: jitet, meldet das Statuswort ein TIMEOUT. Wie diese 
Fehlermeldung zu behandeln ist, wird später beschrieben. 
Zur Beendigung der Übertragung muß die UNLSN-Routine 
angesprungen werden. 

UNTLK ($FFAB / 65451): Über diese Routine wird ein 
UNTALK-Befehl über den seriellen Bus übertragen. Alle 
Geräte, die zuvor einen TALK-Befehl erhalten haben, been¬ 
den daraufhin die Datenübertragung. Zum Aufruf der Routine 
sind keine Vorarbeiten nötig. 

UNLSN ($FFAE / 65454): Diese Routine sendet einen 
UNLISTEN-Befehl an den seriellen Bus. Dadurch erhalten alle 
Geräte am seriellen Bus den Befehl, den Datenempfang ein- 
zustellen. Hierbei werden allerdings nur die Geräte beein¬ 
flußt, die zuvor auch den LISTEN-Befehl erhalten haben. 
Nach Aufruf der Routine werden betreffende Geräte vom 
seriellen Bus getrennt und warten auf neue Anweisungen. 
Auch diese Routine kann ohne Vorarbeiten aufgerufen wer¬ 
den. 

LISTEN ($FFB1 / 65457): Die »LISTEN«-Routine sendet 
den LISTEN-Befehl an ein Gerät, das am seriellen Bus ange¬ 
schlossen ist. Zur Vorbereitung wird die gewünschte Geräte¬ 
nummer in den Akku geladen und die Routine aufgerufen. 
Über die LISTEN-Anweisung wird die Zahl im Akku Bit für Bit 
ODER-verknüpft und in eine LISTEN-Adresse gewandelt. 
Dieses Byte wird dann als Befehl über den seriellen Bus über¬ 
tragen (Beispiel siehe Listing 2). 

TALK ($FFB4 / 65460): »TALK« sendet über den seriellen 
Bus den TALK-Befehl zu einem Peripheriegerät. Das Gerät 
wird dadurch vorbereitet, Daten an den Computer zu senden. 
Vor Aufruf der Routine ist zunächst die gewünschte Geräte¬ 
nummer in den Akku zu laden. Dieser Wert wird anschließend 
Bit für Bit ODER-verknüpft und als TALK-Adresse über den 
seriellen Bus gesendet (siehe Listing 3). 
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READST ($FFB7 / 65463): Die »READST«-Routine liest den 
Status der Ein-/Ausgabegeräte und übergibt diesen an den 
Akkumulator. Diese Routine sollte nach jedem Transfer mit 
einem Ein-/Ausgabegerät aufgerufen werden, um zu überprü¬ 
fen, ob Fehler während der Ein-/Ausgabe aufgetreten sind. 
Nach Aufruf der Routine muß der Akku ausgewertet werden. 

Ist Bit 0 gesetzt, wird ein TIMEOUT beim Schreiben über 
den seriellen Bus gemeldet. 

Gesetztes Bit 1 zeigt einen TIMEOUT beim Lesen an. 

Bit 2 signalisiert bei Kassettenoperationen einen »kurzen 
Satz«. 

Ist Bit 3 gesetzt, handelt es sich entsprechend um einen 
»langen Satz«. 

Bei gesetztem Bit 4 wird ein »Nicht korrigierbarer Lesefeh¬ 
ler« von der Datasette gemeldet. 

Bit 5 zeigt bei Kassettenoperationen einen Prüfsummen¬ 
fehler an. 

Bit 6 zeigt beim Lesen vom Diskettenlaufwerk das Datei¬ 
ende an. 

Ist das angesprochene serielle Gerät nicht vorhanden, wird 
Bit 7 gesetzt (DEVICE NOT PRESENT ERROR). Bei Kasset¬ 
tenoperationen zeigt Bit 7 das Bandende an. 

Das Beispielprogramm (Listing 7) liest den Ein-/Ausgabe- 
status und gibt diesen bitweise auf dem Bildschirm aus. Ver¬ 
suchen Sie nun, das Directory ihrer Diskette zu lesen und las¬ 
sen Sie dabei den Floppyschacht offen. Nun müßte die LED 
des Diskettenlaufwerks einen Fehler anzeigen. Wenn nun mit 
SYS 8192 das Beispielprogramm gestartet wird, müßte Bit 2 
(für TIMEOUT beim Lesen) gesetzt sein. Versucht man auf 
die Floppy zuzugreifen, wenn diese ausgeschaltet ist, ist Bit 
7 gesetzt (Floppy nicht vorhanden). Die gleichen Versuche 
lassen sich natürlich auch mit der Datasette durchführen. 

. 2000 20 b7 ff jsr $ffb7 (READST) Status lesen 

. 2003 8d 20 20 sta $2020 Status Zwischenspeichern 

. 2006 a9 08 lda #$08 Zähler für 8 Bit 

. 2008 8d 21 20 sta $2021 ... (Bit 0-7) einrichten 

. 200b a9 00 lda #$00 High-Byte gleich 0 

. 200d a2 01 ldx #$01 Low-Byte gleich 1 

. 200f Oe 20 20 asl $2020 Status Bit für Bit holen 

. 2012 bO 02 bcs $2016 Bit gesetzt ?, 1 ausgeben 

. 2014 a2 00 ldx #$00 Low-Byte gleich 0 

. 2016 20 5f a4 jsr $a45f Integer-Zahl ausgeben 

. 2019 ce 21 20 dec $2021 Zähler um 1 verringern 

. 201c dO ed bne $200b Ungleich 0 ?, dann weiter 

. 201e 60 rts ENDE 

Listing 7: Ein-/Ausgabestatus bitweise darstellen 

SETLFS (SFFBA / 65466): Diese Kernelroutine richtet eine 
logische Datei ein. Sie übergibt Dateinummer, Geräte¬ 
adresse und Sekundäradresse an andere Kernelroutinen. 
Zur Vorbereitung muß die Geräteadresse (0 bis 31) in das X- 
Register geladen werden, das die logische Dateinummer ent¬ 
halten muß. Die Sekundäradresse wird ins Y-Register ge¬ 
schrieben. Soll keine Sekundäradresse übertragen werden, 
muß dieses Register auf $FF (255) gesetzt werden. Das Bei¬ 
spielprogramm (Listing 8) setzt logische Dateinummer 1, 
Gerätenummer 8 und Sekundäradresse 15. 


Das X-Register enthält dabei das Low-Byte der Adresse. 
Das Y-Register entsprechend das High-Byte. 

Das Beispielprogramm (Listing 9) übergibt den östelligen 
Namen »64’er«. 


2000 a9 01 lda #$01 

2002 a2 08 ldx #$08 

2004 aO Of ldy #$0f 

2006 4c ba ff jmp $ffba 


Logische Dateinummer 1 
Geräteadresse 8 
Sekundäradresse 15 
(SETLFS) Datei einrichten 


2000 a9 05 lda #$05 

2002 aO Oa ldy #$20 

2004 a2 20 ldx #$0a 

2006 20 bd ff jsr $ffbd 

2009 60 rts 
200a 36 34 27 45 52 


Länge des Namens gleich 5 
Adresse des 

... Dateinamens ($200a) 
(SETNAM) Name übergeben 
ENDE 
"64'er" 


Listing 9: Name »64’er« für OPEN, SAVE oder LOAD 
übergeben 


OPEN ($FFC0 / 65472): Die »OPEN«-Routine öffnet eine 
logische Datei. Voraussetzung ist, daß die Kernelroutinen 
SETNAM und SETLFS vorher aufgerufen wurden. Für die 
Routine selbst sind keine Parameter erforderlich. Mit dem 
nun folgenden Beispielprogramm (Listing 10) wird der Basic- 
Befehl 

OPEN 1,8,15, "n:64'er" 
simuliert. 

Vorsicht: Das Programm formatiert Ihre Diskette (ohne ID). 
Legen Sie also eine unwichtige, formatierte Diskette ein, 
bevor Sie das Programm starten. 


. 2000 a9 07 lda #$07 

. 2002 aO 20 ldy #$20 

. 2004 a2 16 ldx #$16 

. 2006 20 bd ff jsr $ffbd 

. 2009 a9 01 lda #$01 

. 200b a2 08 ldx #$08 

or 29ßd *7 Of ldy #$0f 

. 200f 20 ba ff jsr $ffba 

. 2012 20 cO ff jsr $ffc0 

. 2015 60 rts ■ 


Länge des Namens gleich 7 
Adresse des 
... Dateinamens 
(SETNAM) Name übergeben 
Logische Dateinr. gleich 1 
Geräteadresse gleich 8 
Sekundäradresse gleich 15 
(SETLFS) Paramet. übergeben 
(OPEN) 

ENDE 

"n:64'er" Dateiname 


. 2016 4e 3a 36 34 27 45 52 

Listing 10: Disketten formatieren mit 3 Kernel-Routinen 


CLOSE ($FFC3 / 65475): Wird eine Datei mittels der OPEN- 
Routine geöffnet, muß diese nach Beendigung der Ein-/Aus- 
gabe wieder geschlossen werden. Die Voraussetzungen für 
die Funktion dieser Routine sind natürlich dieselben wie bei 
der OPEN-Routine. »CLOSE« schließt nur die logische Datei, 
deren Nummer sich im Akku befindet. Unser Beispielpro¬ 
gramm 10 ist also nicht ganz korrekt. Die Diskette wird zwar 
formatiert, aber die Datei nicht mehr geschlossen. Versucht 
man, die Routine erneut aufzurufen, passiert nichts. Listing 
11 zeigt nun das vollständige Programm zur Formatierung 
einer Diskette. Hier wird zusätzlich noch die ID angegeben, 
die dafür sorgt, daß die Diskette vollständig formatiert wird. 
Das Beispielprogramm simuliert also folgende BASIC- 
Befehle: 

OPEN 1,8,15, "n:64’er,64" 


Listing 8: Beispielpogramm für »SETLFS« 

SETNAM ($FFBD / 65469): »SETNAM« legt die Datei¬ 
namen für die Kernelroutinen OPEN, SAVE und LOAD fest. 
Dabei wird der Akkumulator mit der Länge des Namens 
belegt. X- und Y-Register enthalten die Adresse des Namens, 
der als String irgendwo im Speicher liegen kann. 


CLOSE 1 

. 2000 a9 0a 

lda 

# $0a 

Länge des Namens gleich 10 

. 2002 

aO 20 

ldy 

#$20 

Adresse des 

. 2004 

a2 lb 

ldx 

# $lb 

... Dateinamens ($201b) 

. 2006 

20 bd 

ff jsr 

$ffbd 

(SETNAM) Name übergeben 

. 2009 

a9 01 

lda 

#$01 

Logische Dateinr. gleich 1 

. 200b 

a2 08 

ldx 

#$08 

Geräteadresse gleich 8 

. 200d 

aO Of 

ldy 

#$0f 

Sekundäradresse gleich 15 

. 200f 

20 ba 

ff jsr 

$ffba 

(SETLFS) Paramet. übergeben 

. 2012 

20 cO 

ff jsr 

$ffcO 

(OPEN) 

. 2015 

a9 01 

lda 

#$01 

Logische Dateinr. gleich 1 

. 2017 

20 c3 

ff jsr 

$ffc3 

(CLOSE) 

. 201a 

60 

rts 


ENDE 
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. 201b 4e 3a 36 34 27 45 52 2c "n:64'er, 

. 2023 36 34 64" 

Listing 11: Korrekte Formatierroutine mit den Kerneiroutinen 
SETNAM, SETLFS, OPEN und »CLOSE« 

CHKIN ($FFC6 I 65478): Jede über die OPEN-Routine 
geöffnete logische Datei kann über diese Routine als Einga¬ 
bekanal definiert werden. Voraussetzung ist natürlich, daß es 
sich dabei um ein Eingabegerät handelt, da es sonst zu einer 
Fehlermeldung kommt und die Routine abgebrochen wird. 

Diese Routine muß dann aufgerufen werden, wenn keine 
Daten von der Tastatur übergeben werden und anschließend 
mit den Kernelroutinen CHRIN oder GEHN gearbeitet wer¬ 
den soll. Wird diese Routine mit einem Gerät am seriellen Bus 
benutzt, dann werden automatisch die TALK-Adresse und die 
eventuell festgelegte Sekundäradresse an den BUS über¬ 
geben. 

Vor Aufruf dieser Routine muß die Nummer der logischen 
Datei ins X-Register geladen werden. Bei Verwendung dieser 
Routine kann es zu 3 Fehlermeldungen kommen: 

I/O ERROR # 3 : logische Datei nicht geöffnet 

I/O ERROR # 5 : Gerät nicht vorhanden 

I/O ERROR #6 : logische Datei ist keine Eingabedatei 

CKOUT ($FFC9 / 65481): Mit der »CKOUT«-Routine wird 
die Ausgabe (zum Beispiel BSOUT) auf ein beliebiges Ausga¬ 
begerät geleitet. Bedingung ist, daß die logische Datei als 
Ausgabedatei definiert ist und daß es sich bei dem angespro¬ 
chenen Gerät um ein Ausgabegerät handelt. Ist dies nicht der 
Fall, erfolgt eine Fehlerausgabe, und die Routine wird abge¬ 
brochen. Bei Bildschirmausgabe ist diese Routine nicht 
erforderlich. Bei Ausgabe über den seriellen Bus überträgt 
diese Routine automatisch die durch die OPEN-Routine fest¬ 
gelegte LISTEN-Adresse und Sekundäradresse. 

Bevor diese Routine aufgerufen werden kann, muß über 
den OPEN-Befehl die LISTEN-Adresse und eventuell die 
Sekundäradresse übergeben werden. Anschließend ist dem 
X-Register die logische Dateinummer (die gleiche wie bei 
OPEN) zu übergeben. Erst jetzt läßt sich die »CKOUT«- 
Routine aufrufen. Auch hier können drei Fehlermeldungen 
auftreten: 

I/O ERROR # 3 : logische Datei nicht geöffnet 

I/O ERROR # 5 : Gerät nicht vorhanden 

I/O ERROR # 7 : logische Datei ist keine Ausgabedatei 

CLRCH ($FFCC / 65484): Die »CLRCH«-Routine wird zum 
Schließen aller offenen Kanäle und zur Initialisierung der Ein-/ 
Ausgabekanäle benutzt. Die Standard-Ein-/Ausgabegeräte 
des CI6, C116 oder Plus/4 sind Tastatur und Bildschirm. 
Wurden für den Datenaustausch andere Geräte als Ein-/Aus- 
gabegeräte gesetzt, empfiehlt es sich, nach Beendigung der 
Arbeit wieder mit »CLRCH« auf die Standardgeräte umzu¬ 
schalten. 

Ist einer der zu schließenden Kanäle der serielle Bus, so 
wird zunächst zum Schließen des Eingabekanals der 
UNTALK-Befehl gesendet. Die seriellen Ausgabekanäle wer¬ 
den über die UNLISTEN-Routine geschlossen. Diese Rou¬ 
tine kann ohne Vorbereitungen aufgerufen werden, da alle 
Kanäle geschlossen werden. Bei Verwendung der CLALL- 
Routine wird diese Routine automatisch mit aufgerufen. 

BASIN ($FFCF / 65487): »BASIN« dient zur Dateneingabe 
über die Tastatur oder über ein Gerät, das zuvor mit CHKIN 
als Eingabegerät definiert wurde. Bei Eingabe über die Tasta¬ 
tur blinkt der Cursor. Es können ebenso wie bei der Basic- 
Anweisung »INPUT« alle Zeichen eingegeben werden. Es ist 
also auch möglich, mit dem Cursor aus der Eingabezeile zu 
fahren oder den Bildschirm zu löschen. 

Bei Aufruf der »BASIN«-Routine wird das eingegebene Zei¬ 
chen an den Akku übergeben und gleichzeitig auf dem Bild¬ 
schirm dargestellt. Die kleine Beispielroutine (Listing 12) 
führt in einer Schleife so lange die BASIN-Routine aus, bis die 


RETURN-Taste gedrückt wird. Betätigt man nach dem Start 
des Programms mit SYS 8192 irgendeine Taste, so wird diese 
auf dem Bildschirm dargestellt. Für den Editor haben diese 
Zeichen aber keinerlei Bedeutung. 

. 2000 20 cf ff jsr $ffof (BASIN) Zeichen holen 

. 2003 c9 Od cmp #$0d Zeichen gleich RETURN ? 

. 2005 d0 f9 bne $2000 Nein, dann weiter 
. 2007 60 rts ENDE 

Listing 12: Beispielprogramm »BASIN« 

BSOUT ($FFD2 / 65490): Dies ist die wohl am häufigsten 
benutzte Kernel-Routine aller Commodore-Computer. Die 
Routine gibt ein Zeichen, das im ASCII-Fbrmat im Akku steht, 
auf dem Bildschirm aus. Wurde zuvor mit CKOUT ein anderes 
Gerät als Ausgabegerät definiert, erfolgt die Ausgabe natür¬ 
lich auf diesem Gerät. Die »BSOUT«-Routine überträgt jedes 
ASCII-Zeichen. So ist es auch möglich, den Bildschirm zu 
löschen, die Farbe zu ändern und alle anderen Funktionen, 
die im Basic über PRINT CHR$(x) zu erreichen sind, durchzu¬ 
führen. Bei der Bildschirmausgabe ist zu beachten, daß der 
Code an der momentanen Cursorposition ausgegeben wird. 
Handelt es sich dabei um ein Zeichen, wird die Cursorposi¬ 
tion nach der Ausgabe um 1 Zeichen vorgerückt. Unser Bei¬ 
spielprogramm (Listing 13) gibt einen kurzen, farbigen und 
blinkenden Text auf dem gelöschten Bildschirm aus: 


2000 

aO ff 

ldy #$ff 

Zeiger in Texttabelle 

2002 

c8 

iny 

Zeiger um 1 erhöhen 

2003 

b9 0c 

20 lda $200c,y 

Holt Zeichen aus Tabelle 

2006 

20 d2 

ff jsr $ffd2 

(BSOUT) Zeichen ausgeben 

2009 

dO f7 

bne $2002 

Zeichen nicht 0, dann weiter 

200b 

60 

rts 

ENDE 


. 2ÜÖÖ-93 11 11 11 11 11 20 20 Beispieltext: 

. 2014 20 20 20 82 50 52 4f 47 ... ($00 = ENDE) 

. 201c 52 41 4d 4d 20 le 56 4f 

. 2024 4e 20 lc 43 2e 51 2e 53 

. 202c 90 11 11 11 11 00 00 00 

Listing 13: Textausgabe mit der »BSOUT«-Routine 

LOAD ($FFD5 / 65493): Mit Hilfe dieser Kernelroutine wer¬ 
den Daten direkt von einem beliebigen Eingabegerät in den 
Speicher des C16, C116 oder Plus/4 geladen. Sie kann auch 
für Verify-Zwecke verwendet werden. Das heißt, die Daten im 
Speicher werden mit den Daten, die über LOAD-Routine 
geholt werden, verglichen. Die Daten im Speicher bleiben 
dabei unverändert. Damit die Routine zwischen LOAD und 
VERIFY unterscheiden kann, muß der Akku entsprechend 
mit 0 oder 1 belegt werden: 

LOAD : Akku = 0 
VERIFY : Akku = 1 

Wird vor dem Aufruf der LOAD-Routine die OPEN-Routine 
mit Sekundäradresse 0 angesprungen, so wird die Lade¬ 
adresse des Datenfiles ignoriert. In diesem Fall muß das X- 
und Y-Register die Ladeadresse enthalten (X-Register = 
Low, Y-Register = High). Wählt man als Sekundäradresse 1 
oder 2, wird das Programm an die durch die Ladeadresse 
gegebene Position in den Speicher geladen. Nach Beendi¬ 
gung der LOAD-Routine enthalten X- und Y-Register die 
Adresse des letzten geschriebenen Bytes. Diese Adresse 
kann dann dem Variablenanfangs-Zeiger übergeben werden. 
Das Beispiel-Listing (Listing 14) lädt ein Programm mit dem 
Namen PROGRAMMNAME von Diskette an die absolute 
Ladeadresse (wie LOAD "PROGRAMMNAME",8,1). An¬ 
schließend wird die Adresse des obersten benutzten RAM- 
Speichers in den Variablenanfangs-Zeiger geschrieben. Vor 
Aufruf der LOAD-Routine muß zunächst mit SETLFS eine 
logische Datei geöffnet und mit SETNAM der Programm- 
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name übergeben werden. Im Akku ist das Flag für »Laden« zu 


setzen. 






. 2000 

a9 01 


lda 

#$01 

Logische Datei 1 

. 2002 

a2 08 


ldx 

#$08 

Gerätenummer 8 

. 2004 

aO 00 


ldy 

#$01 

Absolut Laden 

. 2006 

20 ba 

ff 

jsr 

$ffba 

(SETLFS) 

. 2009 

a9 0c 


lda 

#$0c 

Länge des Namens = 12 

. 200b 

a2 22 


ldx 

#$22 

Zeiger auf 

. 200d 

aO 20 


ldy 

#$20 

... Programmname ($2022) 

. 200 f 

20 bd 

ff 

jsr 

$ffbd 

(SETNAM) 

. 2012 

a9 00 


lda 

#$00 

Flag für Laden 

. 2014 

aO ff 


ldy 

#$ff 


. 2016 

a2 ff 


ldx 

#$ff 


. 2018 

20 d5 

ff 

jsr 

$ffd5 

(LOAD) 

. 201b 

86 2d 


stx 

$2d 

Schreibt 

. 20 ld 

84 2e 


sty 

$2e 

... Variablenanfang 

. 201f 

60 


rts 


ENDE 

. 2020 

ea 


nop 



. 2021 

ea 


nop 




. 2022 50 52 4f 47 52 41 4d 4d Programmname 

. 202a 4e 4l 4d 45 00 00 00 00 

Listlng 14: Beispielprogramm für absolutes Laden von Diskette 

SAVE ($FFD8 / 65496): Mit Hilfe der »SAVE«-Routine läßt 
sich ein beliebiger Speicherbereich auf Diskette beziehungs¬ 
weise Kassette speichern. Zuvor müssen wiederum die 
SETLFS- und SETNAM-Routine aufgerufen werden. Die 
»SAVE«-Routine benötigt mehr Parameter als zum Beispiel 
die LOAD-Routine. Die Startadresse des zu speichernden 
Bereichs muß in einer Zeropage-Adresse (2 Byte) abgelegt 
werden. Dem Akku wird anschließend diese Adresse überge¬ 
ben. DasX-und Y-Register muß die Endadresse +1 (!) im For¬ 
mat (Low-Byte, High-Byte) enthalten. Folgendes Beispielpro¬ 
gramm (Listing 15) speichert den Grafik-Bereich ($2000 bis 
$3FFF) unter dem Namen GRAFIK auf Diskette. Das Pro¬ 
gramm wird mit SYS 4352 gestartet. Nach dem Basic-Befehl 
SCNCLR kann das Grafikbild mit SYS 4394 wieder geladen 
werden. 



SAVE-Routine 

(SYS 4352) 

. 1100 

a9 

01 

lda 

#$01 

Logische Dateinummer 1 

. 1102 

a2 

08 

ldx 

#$08 

Geräteadresse 8 (Floppy) 

. 1104 

aO 

00 

ldy 

#$00 

Sekundäradresse 0 

. 1106 

20 

ba 

ff jsr 

$ffba 

(SETLFS) 

. 1109 

a9 

06 

lda 

#$06 

Länge des Namens = 6 

. 110b 

a2 

22 

ldx 

#$22 

Adresse des 

. llOd 

aO 

11 

ldy 

#$11 

... Filenamens ($1122) 

. HOf 

20 

bd 

ff jsr 

$ffbd 

(SETNAM) 

. 1112 

a2 

00 

ldx 

#$00 

Startadresse des Grafik- 

. 1114 

aO 

20 

ldy 

#$20 

... Bereichs ($2000) 

. 1116 

86 

d8 

stx 

$d8 

... nach $d8-$d9 

. 1118 

84 

d9 

sty 

$d9 

... kopieren 

. lila 

a9 

d8 

lda 

#$d8 

... Startadresse in Akku 

. 111c 

aO 

40 

ldy 

#$40 

. Endadresse ($4000) 

. Ille 

20 

d8 

ff Jsr 

$ffd8 

(SAVE) 

. 1121 

60 


rts 


ENDE 

. 1122 

47 

52 4l 46 49 4b 

Filename "GRAFIK" 


LOAD-Routine (SYS 4394) 

. 112a 

a9 

01 

lda 

#$01 

Logische Dateinummer 1 

. 112c 

a2 

08 

ldx 

#$08 

Geräteadresse 8 

. 112e 

aO 

01 

ldy 

#$01 

Absolut Laden 

. 1130 

20 

ba 

ff jsr $ffba 

(SETLFS) 

• 1133 

a9 

06 

lda 

#$06 

Länge des Namens = 6 

. 1135 

a2 

22 

ldx 

#$22 

Adresse des 

. 1137 

aO 

11 

ldy 

#$11 

... Filenamens ($1122) 

. 1139 

20 

bd 

ff jsr $ffbd 

(SETNAM) 


58 


. 113c a9 00 lda #$00 Flag für LOAD 

. 113e 20 d5 ff jsr $ffd5 (LOAD) 

. 1141 60 rts ENDE 

Listing 15: Programm zum Speichern und Laden des 
Grafikbildschirms auf Diskette 


Listing 16 erledigt die gleiche Aufgabe wie das Beispielpro¬ 
gramm 15. Nur kann in diesem Fall der Grafikschirm auf Kas¬ 
sette gespeichert werden. 



SAVE-Routine 

(SYS 4352) 

. 1100 

a9 

01 

lda 

#$01 

Logische Dateinummer 1 

. 1102 

a2 

08 

ldx 

#$01 

Geräteadresse 1 (Datasette) 

. 1104 

aO 

00 

ldy 

#$00 

Sekundäradresse 0 

. 1106 

20 

ba 

ff jsr 

$ffba 

(SETLFS) 

. 1109 

a9 

06 

lda 

#$06 

Länge des Namens = 6 

. 110b 

a2 

22 

ldx 

#$22 

Adresse des 

. llOd 

aO 

11 

ldy 

#$11 

... Filenamens ($1122) 

. HOf 

20 

bd 

ff Jsr 

$ffbd 

(SETNAM) 

. 1112 

a2 

00 

ldx 

#$00 

Startadresse des Grafik- 

. 1114 

aO 

20 

ldy 

#$20 

... Bereichs ($2000) 

. 1116 

86 

d8 

stx 

$d8 

... nach $d8-$d9 

. 1118 

84 

d9 

sty 

$d9 

... kopieren 

. lila 

a9 

d8 

lda 

#$d8 

... Startadresse in Akku 

. 111c 

aO 

40 

ldy 

#$40 

... Endadresse ($4000) 

. Ille 

20 

d8 

ff jsr 

$ffd8 

(SAVE) 

. 1121 

60 


rts 


ENDE 

. 1122 

47 

52 

4l 46 49 4b 

Filename "GRAFIK" 


LOAD- 

Routine (SYS 

4394) 

. 112a 

a9 

01 

lda 

#$01 

Logische Dateinummer 1 

• A12 S *? 

08 

ldx 

#$01 

Geräteadresse 1 (Datasette) 

. li‘2e au 

01 

ldy 

#$01 

Absolut Laden 

. 1130 

20 

ba 

ff jsr $ffba 

(SETLFS) 

. 1133 

a9 

06 

lda 

#$06 

Länge des Namens = 6 

. 1135 

a2 

22 

ldx 

#$22 

Adresse des 

. 1137 

aO 

11 

ldy #$11 

... Filenamens ($1122) 

. 1139 

20 

bd 

ff Jsr $ffbd 

(SETNAM) 

. 113c 

a9 

00 

lda 

#$00 

Flag für LOAD 

. I13e 

20 

d5 

ff jsr $ffd5 

(LOAD) 

. 1141 

60 


rts 


ENDE 


Listing 16: Programm zum Speichern und Laden des 
Grafikbfldschirms auf Kassette 


SETTIM (SFFDB / 65499): Der CI6, C116 und Plus/4 
besitzt eine interne Uhr (Systemtaktgeber), die von einer 
Interrupt-Routine alle Veo-Sekunde aktualisiert wird. Um 
aber 24 Stunden darstellen zu können, benötigt man eine 
Zahl der Größe 24 * 3600 * 60 = 5184000. Diese Zahl ist 
nicht mehr in 2 Byte darzustellen. Man benötigt also ein 
3-Byte-Wort. Dieses wird beim Einschalten des Computers 
automatisch auf Null gesetzt und jede Veo-Sekunde nachge¬ 
stellt. Die Variable TI enthält ständig den aktuellen Wert der 
Systemuhr. Die Zeitvariable Tl$ wird übrigens aus TI berech¬ 
net. Doch nun zur »SETTIM«-Routine. Sie dient zum Setzen 
der 3 Byte des Systemtaktgebers. Vor dem Aufruf dieser 
Routine muß die gewünschte Uhrzeit umgerechnet in 
’/eo-Sekunden in die 3 Register (Akku, X- und Y-Register) 
übergeben werden. Hierbei belegt das höchstwertige Byte 
das Y-Register. Das zweithöchste Byte belegt das X- 
Register, während der Akku mit dem niederwertigen Byte 
belegt wird. Das Beispielprogramm soll die Systemuhr auf 7 
Uhr stellen. Dazu wird erst die Uhrzeit in Veo-Sekunden zer¬ 
legt 7 * 3600 * 60 = 1512000. Diese Zahl wird nun in drei 
Byte zerlegt: 

Höchstes Byte : 23 * 65535 
Mittleres Byte : 18 * 256 
Niederwertiges Byte : 64 



SONDERHEFT 14 









C16, Plus/4 


GRUNDLAGEN 


Nach Übergabe in die drei Register und Aufruf der »SET- 
TIM«-Routine ist die neue Uhrzeit auf 7 Uhr eingestellt. Star¬ 
ten Sie nun das Beispielprogramm (Listing 17) mit SYS 8192 
und überprüfen Sie die Uhrzeit 
SYS 8192 : PRINT Tl$ 


. 2000 aO 17 
. 2002 a2 12 
. 2004 a9 40 
. 2006 20 db 
. 2009 60 


ldy #$17 
ldx #$12 
lda #$40 
ff jsr $ffdb 
rts 


Uhrzeit 
... auf 7 Uhr 
... setzen 
(SETTIM) 

ENDE 


Listing 17: Uhrzeit auf 7 Uhr stellen 


Dateneingabe vom seriellen Bus oder von Kassette die 
BASIN-Routine zu verwenden. Wird trotzdem mit »GEHN« 
gearbeitet, sollte auf keinen Fall vergessen werden, mit der 
READST-Routine mögliche Fehler zu erkennen und auszu¬ 
werten. Das Beispielprogramm (Listing 18) holt zunächst die 
aktuelle Taste in den Tastaturpuffer. Mit GETIN wird die Taste 
als ASCII-Code aus dem Tastaturpuffer in den Akku übertra¬ 
gen. Ist der Akku gleich Null (Tastaturpuffer leer), so wird 
erneut die Tastatur abgefragt. Ansonsten wird das entspre¬ 
chende Zeichen mit Hilfe der BSOUT-Routine auf den Bild¬ 
schirm ausgegeben. Das Programm wird mit SYS 8192 
gestartet und kann mit der STOP-Taste unterbrochen werden. 


RDTIM ($FFDE / 65502): Diese Routine dient zum Lesen 
des Systemtaktgebers. Die aktuelle Uhrzeit wird dabei in 
Veo-Sekunden umgerechnet und an Akku, X- und Y-Register 
übergeben. Auch hierbei wird das höchstwertige Byte im Y- 
Register abgelegt. Das zweithöchste Byte wird dem X- 
Register übergeben, während im Akku das niederwertige 
Byte abgelegt wird. Berechnet wird die aktuelle Uhrzeit mit 
folgender Formel: 

Zeit in Sekunden: 

(Y-Register * 65536 + X-Register * 256 + Akku ) / 60 

Das Beispielprogramm (Listing 17) holt die aktuelle 
Systemzeit in die drei Prozessorregister und speichert diese 
von $200D bis S200F / 8205 bis 8207. Starten Sie nun das 
Programm wie folgt: 

SYS 8192 : PRINT TI 

Merken Sie sich die ausgegebene Zahl, und tippen Sie 
bitte folgende Basic-Zeile im Direktmodus ein: 

PRINT PEEK(8205) * 65535 + PEEK(8206) * 256 
+ PEEK(8207) 

Werden nun beide Zahlen verglichen, dürften sich diese 
um höchstens 3 /6o Sekunden unterscheiden. 

. 2000 20 de ff jsr $ffde 
. 2003 8c Od 20 sty $200d 
. 2006 8e Oe 20 stx $200e 
. 2009 8d Of 20 sta $200f 
. 200c 60 rts 

Listing 17: Beispielprogramm zur Kernelroutine »RDTIM« 

STOP ($FFE1 / 65505): Diese Routine ist nur in Verbindung 
mit der UDTIM-Routine wirksam. Wurde während der Abar¬ 
beitung der UDTIM-Routine (Systemtaktgeber aktualisieren) 
die Stop-Taste gedrückt, setzt die »STOP«-Routine das Zero- 
Flag. Die Vorgehenswelse ist sinnvoll, da die UDTIM-Routine 
von der Kernel-Interrupt-Routine aufgerufen wird und somit 
jederzeit eine Abfrage der Stop-Taste gewährleistet ist. Vor 
Benutzung der »STOP«-Routine muß also gesichert sein, daß 
die UDTIM-Routine aufgerufen wurde. Anschließend ist 
lediglich zu prüfen, ob das Zero-Bit gesetzt ist oder nicht. Die 
STOP-Routine hat aber noch eine zweite Aufgabe. Sie setzt 
alle Kanäle auf ihre Standardwerte zurück. 

GETIN ($FFE4 / 65508): »GETIN« holt ein Byte aus dem 
Tastaturpuffer und übergibt dieses als ASCII-Wert an den 
Akku. Ist der Akku gleich Null, war der Tastaturpuffer leer. Im 
Tastaturpuffer finden maximal zehn Zeichen Platz. Diese wer¬ 
den mit der SCNKEY-Routine in den Puffer übertragen. Ist der 
Tastaturpuffer voll, werden die folgenden Tasten so lange 
überlesen, bis mit der GETIN-Routine Zeichen aus dem 
Puffer ausgelesen werden. 

Die GETIN-Routine kann aber auch Zeichen von anderen 
Eingabegeräten lesen. Dazu muß natürlich erst wieder vor 
dem Aufruf der OPEN-Routine eine logische Datei eröffnet 
und diese mittels CHKIN als Eingabedatei deklariert werden. 
Während diese Routine besonders zum Einlesen der Tastatur 
und des RS232-Kanals geeignet ist, empfiehlt es sich, bei 


. 2000 20 9c ff jsr $ff9c 
. 2003 20 e4 ff jsr $ffe4 
. 2006 fO f8 beq $2000 
. 2008 20 d2 ff jsr $ffd2 
. 200b c9 03 crap #$03 
. 200d dO fl bne $2000 
. 200f 60 rts 


(SCNKEY) Tastatur abfragen 
(GETIN) ASCII-Kode in Akku 
Keine Taste?, dann nochmal 
(BS0UT) Zeichen ausgeben 
STOP-Taste gedrückt ? 

Nein, dann nächst. Zeichen 
Abbruch durch STOP 


Listing 18: Beispielprogramm zur Übergabe des 
Tastaturcodes als ASCII-Wert mittels »GETIN«. 


CLALL ($FFE7 / 65511): Die Kernelroutine »CLALL« 
schließt alle offenen Dateien. Außerdem werden alle Zeiger 
in der Tabelle der offenen Dateien zurückgestellt. Beim Aufruf 
der CLALL-Routine wird automatisch die CLRCHN-Routine 
angesprungen, wodurch auch alle Ein-/Ausgabekanäle initia¬ 
lisiert werden. Diese Routine sollte am Anfang eines jeden 
Maschinenprogramms stehen, in dem mit logischen Dateien 
gearbeitet wird, um sicherzustellen, daß keine offenen 
Dateien, falsche Ein-/Ausgabekanäle aktiv sind. Die Routine 
kann ebne jegliche Vorarbeiten aufgerufen werden. 

UDTirvI (SFFEA / 65514): Diese Routine aktualisiert die 
Systemuhr des CI6, C116 und Plus/4. Normalerweise wird 
die »UDTIM«-Routine alle Veo Sekunden automatisch von 
der Kernel-Interrupt-Routine aufgerufen. Sollte Ihr eigenes 
Programm auf diesen Kernel-Interrupt verzichten und mit 
eigenen Interrupts arbeiten, so muß diese Routine eingebun¬ 
den werden, um sicherzustellen, daß die Systemuhr weiter¬ 
hin aktualisiert wird. Diese Routine ist außerdem die Voraus¬ 
setzung für die Abfrage der Stop-Taste. Wird nach Aufruf die¬ 
ser Routine die STOP-Routine angesprungen, setzt diese bei 
betätigter Stop-Taste das Zero-Bit. Auch diese Routine kann 
ohne Vorbereitungen aufgerufen werden. Soll jedoch die 
STOP-Taste wirksam bleiben, so empfiehlt es sich, anschlie¬ 
ßend die STOP-Routine aufzurufen. Das Beispielprogramm 
(Listing 19) sperrt zunächst die Kernel-Interrupt-Routine und 
stellt anschließend in einer Endlosschleife die Zeit jeweils um 
Veo Sekunde weiter. Um das Programm unterbrechen zu 
können, wird noch die Stop-Routine aufgerufen. Starten Sie 
das Programm (Listing 19) wie folgt: 

LET Tl$= "000000" : SYS 8192 

Wenn Sie das Programm nach etwa einer Minute mit STOP 
unterbrechen und mit 
PRINT TIS 

die Uhrzeit abfragen, werden Sie feststellen, daß auf unserer 
Systemuhr in einer Minute zirka 2 Stunden und 20 Minuten 
vergangen sind. 


. 2000 78 sei 

. 2001 20 ea ff jsr $ffea 

. 2004 20 el ff jsr $ffel 

. 2007 dO f8 bne $2001 

. 2009 58 oll 

. 200a 60 rts 


Interrupt sperren 
(UDTIM) Zelt stellen 
(STOP) Stop-Taste prüfen 
Kein STOP, dann weiter 
Interrupt ermöglichen 
ENDE 


Listing 19: Beispielprogramm »TURBOZEIT« zur Demonstration 
der UDTIM- und STOP-Routine 
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SCREEN (SFFED / 65517): Zur Ermittlung des Bildschirm¬ 
formats wird die »SCREEN«-Routine verwendet. Sie übergibt 
die Bildschirmbreite (Standard: 40 Spalten) dem X-Register 
und die Bildschirmhöhe (Standard: 25 Zeilen) dem Y- 
Register. Vor Aufruf der Routine sind keine Vorarbeiten erfor¬ 
derlich. Anschließend müssen lediglich X- und Y-Register 
ausgewertet werden. Listing 20 gibt das aktuelle Bildschirm¬ 
format auf dem Bildschirm aus. Das Programm wird mit SYS 
8192 gestartet. 


. 2000 

aO 

ff 


ldy 

#$ff 

Zeiger in Texttabelle 

. 2002 

c8 



iny 


Zeiger um J erhöben 

. 2003 

b9 

50 

20 

lda 

$2050,y 

Holt Zeichen aus Tabelle 

. 2006 

20 

d2 

ff 

jsr 

$ffd2 

(BS0UT) Zeichen ausgeben 

. 2009 

dO 

f7 


bne 

$2002 

Zeichen nicht 0, dann weiter 

. 200b 

20 

ed 

ff 

jsr 

$ffed 

(SCREEN) Bildschirmformat 

. 200e 

98 



tya 


Bildschirmhöhe 

. 200f 

48 



pha 


... auf Stack retten 

. 2010 

a9 

00 


lda 

#$00 

Breite nach Akku, X-Reg. 

. 2012 

20 

5f 

a4 

jsr 

$a45f 

Integerzahl ausgeben 

. 2015 

a9 

2a 


lda 

#$2a 

Holt V-Zeichen 

. 2017 

20 

d2 

ff 

Jsr 

$ffd2 

(BS0UT) Zeichen ausgeben 

. 201a 

68 



pla 


Holt Bildschirmhöhe 

. 201b 

aa 



tax 


Bildschirmhöhe nach 

. 201c 

a9 

00 


lda 

#$00 

... Akku, X-Register 

. 201e 

20 

5f 

a4 

jsr 

$a45f 

Integerzahl ausgeben 

. 2021 

60 



rts 


ENDE 


. 2050 93 11 11 11 11 11 20 20 TEXT 

. 2058 42 49 4c 44 53 43 48 49 

. 2060 52 4d 46 4f 52 4d 41 54 

. 2068 20 00 00 00 00 00 00 00 

Listing 20: Bildschirmformat ausgeben 

PLOT ($FFF0 / 65520): Diese Kernelroutine hat zwei Aufga¬ 
ben. Sie dient sowohl zum Lesen wie aber auch zum Setzen 
der aktuellen Cursorposition. Ist das Carry-Bit gesetzt, so 
wird die Cursorposition ausgeiesen und dem X- und Y- 
Register übergeben. Hierbei enthält das Y-Register die Spal¬ 
tennummer (0 bis 39) und das X-Register die Zeilennummer 
(0 bis 24). 

Ist beim Aufruf der »PLOT«-Routine das Carry-Bit gleich 
Null, so wird der Cursor an die durch X- und Y-Register gege¬ 
bene Position gesetzt. Auch hier enthält das Y-Register die 
Spaltennummer (0 bis 39) und das X-Register die Zeilennum¬ 
mer (0 bis 24). Vor dem Aufruf der PLOT-Routine (bei 
gelöschtem Carry-Bit) muß diesen beiden Registern die 
gewünschte Cursorposition übergeben werden. Das Bei¬ 
spielprogramm (Listing 21) schreibt, nach dem Starten mit 
SYS 8192, ein Sternchen in die zehnte Zeile und zwanzigste 
Spalte. 


2000 

a2 09 

ldx #$09 

Zeile 10 

2002 

aO 13 

ldy #$13 

Spalte 20 

2004 

18 

clc 

Carry = 0 

2005 

20 fO 

ff Jsr $fff0 

(PLOT) Cursor setzen 

2008 

a9 2a 

lda #$2a 

Holt '#'-Zeichen 

200a 

20 d2 

ff jsr $ffd2 

(BS0UT) Zeichen ausgeben 

200d 

60 

rts 

ENDE 


Listing 21: Beispielprogramm für PLOT Sternchen In 10. Zeile 
und 20. Spalte setzen 


IOBASE ($FFF3 / 65523): Diese letzte Kernelroutine übergibt 
dem X- und Y-Register die Adresse des Speicherabschnitts, 
ab dem sich die Ein-/Ausgaberegister befinden. Dabei enthält 
das X-Register das Low-Byte und das Y-Register das High- 
Byte der Adresse, 

Soweit zu den 39 Kernelroutinen des CI6, C116 oder 
Plus/4. Tabelle 2 gibt noch eine Übersicht über Stack-Bedarf 
und über die beeinflußten Register der einzelnen Kernel¬ 
routinen. 


Kernel 

Routine: 

Stack- 

Bedarf 

Beeinflußte 

Register 

CINT 

4 

Akku. X-Reg., Y-Reg. 

IOINIT 

0 

Akku, X-Reg., Y-Reg. 

RAMTAS 

2 

Akku, X-Reg., Y-Reg. 

RESTOR 

2 

Akku, X-Reg., Y-Reg. 

VECTOR 

2 

Akku, X-Reg., Y-Reg. 

SETMSG 

2 

Akku 

SECOND 

8 

Akku 

TKSA 

8 

Akku 

MEMTOP 

2 

X-Reg., Y-Reg. 

MEMBOT 

0 

X-Reg., Y-Reg. 

SCNKEY 

5 

Akku, X-Reg., Y-Reg. 

SETTMO 

2 

keine 

ACPTR 

13 

Akku, X-Reg. 

CIOUT 

5 

keine 

UNTLK 

8 

Akku 

UNLSN 

8 

Akku 

LISTEN 

0 

Akku 

TALK 

8 

Akku 

READST 

2 

Akku 

SETLFS 

2 

Akku, X-Reg,, Y-Reg. 

SETNAM 

0 

Akku, X-Reg., Y-Reg. 

OPEN 

0 

Akku, X-Reg., Y-Reg. 

CLOSE 

2 + 

Akku, X-Reg., Y-Reg. 

CHKIN 

0 

Akku, X-Reg. 

CKOUT 

4 + 

Akku, X-Reg, 

CLRCH 

9 

Akku, X-Reg. 

BASIN 

7 + 

Akku, X-Reg. 

BSOUT 

8 + 

Akku 

LOAD 

0 

Akku, X-Reg., Y-Reg. 

SAVE 

0 

Akku, X-Reg., Y-Reg. 

SETTIM 

2 

Akku, X-Reg„ Y-Reg. 

RDTIM 

2 

Akku, X-Reg„ Y-Reg. 

STOP 

O 

Akku, X-Reg. 

GETIN 

7 

Akku, (X-Reg., Y-Reg.)- 

CLALL 

11 

Akku. X-Reg. 

UDTIM 

2 

Akku. X-Reg. 

SCREEN 

2 

X-Req., Y-Reg. 

PLOT 

2 

Akku, X-Reg„ Y-Reg. 

IOBASE 

2 

X-Reg., Y-Reg. 


Tabelle 2: Kernelroutinen mit Stack-Bedarf und beeinflußtem 
Register 


onun®» 


Sonstige nützliche 
Betriebssystemroutinen 


Alle folgenden Routinen treffen nur für den CI6, C116 und 
Plus/4 zu. Da sie aber von großem Nutzen sind, werden hier 
kurz einige der wichtigsten aufgezählt. Eine sehr häufig 
benutzte Routine ist die Ausgabe eines Integer-Wertes. Die 
Einsprungadresse liegt bei $A45F. 

Zuvor ist dem Akku und dem X-Register der entspre¬ 
chende Wert zu übergeben. Wird nun die Routine aufgeru¬ 
fen, erscheint die gewünschte Integerzahl auf dem Bild¬ 
schirm. 

PUTHEX ($FB10 / 64272): Diese Routine gibt den Wert im 
Akku als zweistellige Hex-Zahl aus. 

PUTWRD ($FAFF / 64255): Diese Routine gibt eine vier¬ 
stellige Hex-Zahl aus. Dabei muß der Akku mit dem Low-Byte 
und das X-Register mit dem High-Byte der entsprechenden 
Zahl belegt werden. 

RESET ($FFF9 / 65255): Diese Routine führt einen 
System-Reset durch. Sie hat also die gleiche Wirkung wie die 
Betätigung der Reset-Taste am Computer. 

Soviel zu den Kernelroutinen des C16, C116 und Plus/4. 
Mit Hilfe dieser ausführlichen Beschreibung können viele 
Programme vereinfacht und von anderen Commodore- 
Computern auf eines dieser drei Geräte umgeschrieben 
werden. (Christian Quirin Spitzner/ah) 


ACHTUNG! 

Die in diesem Artikel verwendeten Listings befin¬ 
den sich nicht auf der Programmservice-Diskette! 
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Daten verwalten mit dem 
C16 und Plus/4 


Die Verlockung, private Daten, wie zum Beispiel 
ein Telefon- oder Adressenverzeichnis mit dem 
CI6 oder Plus/4 zu verwalten, ist groß. Wir erklä¬ 
ren Ihnen leicht verständlich und mit vielen Bei¬ 
spielen, was Sie bei der Programmierung des 
Floppy-Laufwerks 1551 beachten müssen. 

Z um Verständnis dieses Artikels müssen dringend aus¬ 
reichende Basic-Kenntnisse vorausgesetzt werden. 
Andernfalls sei der Leser auf unser Sonderheft 7/86 
(»Grundwissen«) verwiesen. Dort findet der Einsteiger alle 
notwendigen Grundkenntnisse. 

In diesem Artikel soll es zwar nur um Dateien des Floppy- 
Laufwerks 1551 gehen, vorweg jedoch trotzdem noch ein 
paar allgemeine Informationen zu Datasette, Harddisk und 
Floppy-Station. 

Das Speichern von Daten auf Kassette ist bei den 
Geschwindigkeiten der Commodore-Datasetten unrentabel. 
Weder ist die Datasette fähig, relativ zu adressieren (dazu 
später), noch ist sie schnell genug, um das Speichern in 
sequentieller Form lohnend zu machen. Der einzige Vorteil ist 
die Preislage, in der sich Kassettengeräte im Vergleich zu den 
Floppy-Laufwerken befinden. Wenn man aber die enormen 
Nachteile mit den Preisvorteilen vergleicht, so muß man fest¬ 
stellen, daß, zumal man heutzutage bei der richtigen Adresse 
Disketten zu einem Preis ab drei Mark erhalten kann, sich 
eine Datasette für jeden ernsteren oder intensiveren 
Computer-Anwender nicht lohnt. Das ist ein hartes Wort, aber 
alle Floppy-Besitzer, die schon einmal mit einer Datasette 
gearbeitet haben, werden mir zustimmen. 

Wenn man nun die Harddisks (auch Festplatten-Laufwerke 
genannt), mit den Floppy-Disk-Laufwerken vergleicht, so wird 
man feststellen, daß die Harddisks im Vergleich zu der Spei¬ 
cherkapazität der Floppy-Disks (170 KByte) wahrhaft astro¬ 
nomische Größen von mehr als 20 MByte erreichen. Das 
klingt nun sehr schön, allerdings erreichen auch die Preise 
solch astronomische Höhen (meist um 2000 bis 3000 
Mark). Vorteile einer Harddisk zeigen sich vor allem dann, 
wenn man sehr große Tabellen und »Daten-Monster« verwal¬ 
ten muß, da dank der parallelen Datenübermittlung und der 
höheren internen Zugriffszeiten beim Schreiben und Lesen 
die Geschwindigkeit der Datenübermittlung der der Floppy- 
Station 1551 weit überlegen ist. 

Nochmal einige Worte zu denjenigen, die bis vor kurzem 
mit der Datasette gearbeitet haben: Zuerst zu den Sekundär¬ 
adressen: Während es beim Kassettenlaufwerk deren drei 
gibt (0, 1 und 2 für Lesen, Schreiben und Schreiben mit 
»Bandende kennzeichnen«), gibt es beim Floppy-Laufwerk 
nur deren zwei (0 und 1) mit derselben Bedeutung wie bei der 
Kassette. Allerdings sind diese beiden Sekundäradressen 
bei der Floppy-Station von völlig untergeordneter Bedeu¬ 
tung. Bei Datenzugriff durch den Benutzer wird der Lese¬ 
oder Schreibmodus im Filenamen übermittelt. Außerdem 
kennt die Floppy-Station im Gegensatz zur Datasette meh¬ 
rere Dateitypen, aber mehr darüber etwas später. 

Zuerst möchte ich aufzählen, welche Dateitypen existie¬ 
ren, um nachher näher auf die einzelnen Typen einzugehen. 
Gleichzeitig werde ich auch Gebrauch und Anwendung der 

aas? 


sequentiellen und relativen Dateien etwas näher erläutern. 
Es gibt drei Arten von Dateitypen: 

1. Die sequentiellen Dateiarten 

2. Die relativen Dateien 

3. Die Random-Access-Dateien. 


1. Sequentielle Dateien 


Man bezeichnet diejenigen Dateitypen als sequentiell, bei 
denen man nur in einer starren Reihenfolge auf die gespei¬ 
cherten Daten zugreifen kann, und nicht wie bei anderen 
Dateitypen die Möglichkeit hat, auf das n-te Byte direkt 
zuzugreifen. 

Der Vorteil dieses Dateityps liegt vor allem in der Einfach¬ 
heit seines Aufbaus, sein größter Nachteil ist die lange Warte¬ 
zeit, wenn innerhalb der Datei ein bestimmtes Element 
gesucht werden muß. Vor allem bei sehr großen Dateien kann 
eine solche Wartezeit sehr unangenehm sein oder gar der 
Benutzerfreundlichkeit eines Programms schaden. 

1.1 Dateiarten 

Es existieren als sequentielle Dateitypen die Dateiarten 
SEQuShtiell, USeR und PRoGramm. Sie sind vom Zugriff her 
alle absolut gleich, nur die Kennung im OPEN-Befehl ändert 
sich, man benutzt meistens die Anfangsbuchstaben des File¬ 
typs. Man muß darauf achten, daß nur jeweils drei sequen¬ 
tielle Dateien gleichzeitig geöffnet sein können. 

Es muß nochmal gesagt werden: Diese drei Dateitypen 
sind vom internen Aufbau auf der Diskette her absolut gleich, 
nur im Directory werden sie als unterschiedlich angezeigt. 
Der Grund ist wohl vor allem, daß diese Files ( = Dateien) 
jeweils auch unterschiedlich genutzt werden; zum Beispiel 
die Programmdateien eben für Programme, sequentielle 
Dateien hingegen für Benutzer-Daten. 

1.2 Zugriff auf sequentielle Dateien 

Zuerst einmal die benötigten Basic-Befehle: 

- OPEN Kanal, Gerät, Sekundäradresse, "Name, Filetyp 
(S,P oder U), Modus (R oder W)" 

- CLOSE Kanal 

- PRINT# Kanal, Text (;) 

- INPUT# Kanal, Text 

- GET # Kanal, Text 

Kanal: Kanalnummer, vom Benutzer frei wählbar (zwischen 
1 und 127) 

Gerät: Adresse des Peripheriegerätes (für die Floppy-Sta¬ 
tion meist 8 oder 9) 

Sekundäradresse: Floppy-interne Kanalnummer (liegt für 
unsere Zwecke zwischen 1 und 14, muß ungleich 15 sein, da 
diese den Kommandokanal des Floppy-Laufwerks anspricht). 
Name: Der Name des gewünschten Files 
Filetyp: Kennbuchstabe, der entscheidet, welcher Datei¬ 
typ geöffnet werden soll (SEQ, PRG oder USR) 

Modus: Ist meistens »R« oder »W«, seltener »A«, für Notfälle 
»M«. 

»W« bedeutet, daß die betreffende Datei zum Schreiben 
geöffnet werden soll. Wenn sie schon existiert, 
wird ein »FILE EXISTS ERROR« gemeldet. 
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»A« erlaubt es, eine sequentielle Datei zum Schreiben 
zu öffnen. Dabei werden die zu schreibenden 
Daten an ein schon existierendes File angehängt. 
»R« mit diesem Buchstaben eröffnet man eine schon 
existierende Datei, um sie zu lesen. 

»M« Wenn eine Datei nicht ordnungsgemäß geschlos¬ 
sen wurde, so steht im Directory hinter dem File¬ 
namen ein Stern, und diese Datei kann nicht mehr 
gelesen werden. Um jetzt wenigstens einen Teil 
der Daten zu retten, muß man das File im Modus M 
eröffnen, die Daten lesen und dann in ein neues 
File ablegen. 

1.3 Besonderheiten von PRINT # und INPUT # 

PRINT #: Bei diesem Befehl darf man nicht vergessen, daß 
nach jeder Ausgabe, wie auf dem Bildschirm auch, ein 
CHR$(13), das heißt ein »Return« gesendet wird. Um dies zu 
vermeiden (wenn man zum Beispiel auf der Diskette Strings 
zusammensetzen will), muß man nach dem Print-Befehl ein 
Semikolon setzen, das das normalerweise automatische 
Senden eines »Returns« unterdrückt. 

INPUT #: Hier müßte man Commodore eigentlich Vorwürfe 
machen, daß sie einen so nützlichen Befehl so schlecht aus¬ 
gebaut haben. Er zeigt einige Schwächen, die die Nutzung 
von Dateien erschweren, und vor allem dem Anfänger Pro¬ 
bleme bereiten können. Die eine Schwäche ist die Beschrän¬ 
kung der Länge der ausgelesenen Strings auf 88 Zeichen, 
die andere ist die »EXTRA IGNORED«-Fehlermeldung bei 
bestimmten Satzzeichen. Das Unangenehmste freilich ist, 
daß der INPUT #-Befehl Stringteile zwischen einem Komma 
und einem »Return« entweder als selbständige Strings 
betrachtet, oder aber sie völlig ignoriert! 

1.4 Beispiele 

1. Beispiel 

10 OPEN 2,8,2, "TEST,S,W" 

20 IF DS = 0 THEN 40 

30 PRINT "FEHLER : PRINT DS$: END 

40 PRINT #2, "DIES IST EIN GANZER SATZ!" 

50 CL0SE 2 

60 IF DS < > 0 THEN 30 
70 PRINT"OK" : CL0SE 2: END 

Erklärung: In Zeile 10 wird auf dem Kanal 2 ein sequentiel¬ 
les (Zusatz »,S«) File mit dem Namen »TEST« zum Schreiben 
(Zusatz »,W«) neu eröffnet. 

Dann wird in Zeile 20 der Fehlerkanal des Laufwerks aus¬ 
gelesen. In der Variablen DS ist die Nummer der Fehlermel¬ 
dung gespeichert, O bedeutet OK. 

Wenn DS ungleich O ist, also ein Fehler vorliegt, wird in 
Zeile 30 die Fehlermeldung ausgegeben (sie ist in der Varia¬ 
blen DS$ enthalten) und das Programm abgeschlossen. 

In Zeile 40 wird der Text auf Kanal 2 ausgegeben, also in 
die Datei geschrieben. 

Dann wird in Zeile 50 das File geschlossen. Wenn man dies 
nicht machen, sondern einfach die Diskette aus dem Lauf¬ 
werk entfernen würde, wäre das File im Directory als fehler¬ 
haft gekennzeichnet und nicht mehr zu gebrauchen. 

In Zeile 60 wird wieder der Floppystatus kontrolliert und bei 
aufgetretenem Fehler in der Zeile 30 ausgegeben. 

Zeile 70 schließt einfach den Dateikanal und beendet die¬ 
ses kleine Programm. 

2. Beispiel: 

10 OPEN 1,8,1, "TEST,S,R" 

20 INPUT# 1,A$ 

30 PRINT A$ 

40 CL0SE 1 : END 

Erklärung: Dieses kleine Programm öffnet unsere sequen¬ 
tielle Datei »TEST« zum Lesen (Zusatz »,R«), In Zeile 10 wird 
die Datei geöffnet und der Kanalnummer 1 zugewiesen. 


Dann wird aus dem Kanal 1 und somit aus unserer Datei ein 
String gelesen und auf dem Bildschirm ausgegeben. 

Anschließend wird Kanal 1 wieder geschlossen. In diesem 
Fall, beim Lesen einer Datei, ist es eigentlich ungefährlich, die 
Diskette aus dem Laufwerk zu nehmen, wenn der Kanal noch 
offen ist (rote LED an der Floppy-Station leuchtet), man sollte 
aber trotzdem konsequent vorgehen und nicht benötigte 
Dateien immer mit einem CLOSE schließen. 

3. Beispiel: 

10 OPEN 2,8,2, "TEST,S,A" 

20 PRINT#2, "DAS IST EIN ZWEITER SATZ" 

30 CLOSE 2 : END 

Erklärung: Dieses Mini-Programm öffnet das File »TEST« im 
»Append«-Modus. Das heißt, die vorhandenen Einträge in der 
Datei bleiben erhalten, und die neuen Einträge werden hinten 
angehängt. 

Wenn man jetzt diese Datei wieder auslesen will, dann kann 
man so vorgehen wie im Beispiel 2, nur müssen jetzt statt 
einem INPUT#-Befehl zwei ausgeführt werden. 

4. Beispiel: 

10 OPEN 1,8,1, "LISTING-TEST,U,W" 

20 CMD1:LIST 
PRINT# 1: CLOSE 1 

Erklärung: Wenn man dieses Programm laufen läßt, »listet« 
es sich selbst auf Diskette, und kann mit Hilfe des nächsten 
Beispiels ausgedruckt werden. 

In Zeile 10 wird ein User-File zum Schreiben geöffnet, dann 
werden in Zeile 20 sämtliche Ausgaben des Computers (also 
auch der LIST-Befehl) zu Kanal 1 umgeleitet und somit auf 
unsere Datei ausgegeben. Anschließend muß der Kanal 1 im 
Direktmodus geschlossen werden, da sonst das Programm 
nach einem LIST automatisch abgebrochen wird. Der 
PRINT tt~ Befehl vor dem CLOSE setzt den CMD-Befehl wie¬ 
der zurück. 

5. Beispiel: 

10 OPEN 2,8,2, "LISTING-TEST,U,R" : OPEN 4,4 
20 GET # 2,A$:B=ST:PRINT # 4,A$; 

30 IF B AND 216 <> 0 THEN 20 
40 CLOSE 2 : CLOSE 4 : END 

Erklärung: Dieses Programm gibt ein Basic-Programm, das 
auf Diskette mittels CMD gelistet wurde, auf einem Drucker 
aus. 

Zuerst wird in Zeile 10 das File auf Diskette geöffnet, dann 
der Kanal zum Drucker (Geräteadresse 4). 

Jetzt wird in Zeile 20 ein Zeichen aus der Datei geholt, dann 
der Status in eine andere Variable gerettet und das eine Zei¬ 
chen ohne »Return« (deshalb das Semikolon nach dem 
PRINT-Befehl) auf dem Drucker ausgegeben. 

Dann wird der gerettete Status auf Bit 6 kontrolliert, und, 
wenn dieses nicht gesetzt ist, das nächste Zeichen von Dis¬ 
kette geholt. Ist Bit 6 gesetzt, ist das Ende der Datei erreicht, 
und die Kanäle werden wieder geschlossen. 

Noch eine kleine Erklärung zum Status in der Variablen ST: 
In diesem Status-Byte wird das sechste Bit auf eins gesetzt, 
wenn das letzte Byte des Files gelesen wurde. Bezeichnen¬ 
derweise heißt dieses sechste Bit auch EOF ( = End of File). 
Allerdings darf der Anwender nicht vergessen, das Status- 
Byte sofort nach dem GET oder gegebenenfalls nach einem 
INPUT in einer Variablen (hier: B) zu retten, da sich der Wert 
dieses Bytes nach einem PRINT-Befehl an die Peripherie 
(hier: Drucker) auch ändern kann. 

2. Relative Dateien 


Relative Dateien sind nun etwas ganz anderes als die vorher 
behandelten sequentiellen Dateien. Von ihnen gibt es nur 
einen Typ - eben relativ, im Gegensatz zu den sequentiellen, 
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wo es eine feinere Unterteilung in einzelne Arten gab. 

Da relative Dateien vom C16-Basic nicht unterstützt wer¬ 
den, müssen alle Kommandos relativ umständlich erfolgen. 
Die aus dieser Verwaltungsart resultierenden Vorteile über¬ 
wiegen die vorhandenen Nachteile aber bei weitem. 

Man kann eine relative Datei am besten mit einem ein¬ 
dimensionalen Stringfeld vergleichen, wo alle Strings die glei¬ 
che Länge haben. So wie man im Speicher diese einzelnen 
Array-Teile adressieren kann, ist es auch in relativen Dateien 
möglich, einen bestimmten Datenblock (=Record) zu lesen 
oder zu schreiben. Das erklärt natürlich, warum diese Dateien 
als »schnell« bezeichnet werden: Auf einen einzelnen 
Record, auch wenn er ganz am Schluß der Datei ist, kann 
sofort zugegriffen werden, da die Floppy-Station intern noch 
eine Tabelle verwaltet, auf der die genaue Position der 
Recordanfänge verzeichnet ist. 

Noch ein kleiner Tip: Man sollte sich mit diesem Dateityp 
wirklich nur auseinandersetzen, wenn man unbedingt kurze 
Zugriffszeiten benötigt und schon etwas Erfahrung im 
Umgang mit dem Floppy-Laufwerk hat, da, wie gesagt, die 
Anwendung dieser Dateien doch etwas kompliziert werden 
kann. 

2.1 Zugriff auf relative Dateien 

Zum öffnen einer relativen Datei benutzt man folgenden 
Befehl: 

OPEN 2,8,2, "NAME,L,"+CHR$(40) 

Der OPEN-Befehl ist dem der sequentiellen Dateien fast 
gleich, man darf aber nicht vergessen, daß gleichzeitig immer 
nur eine relative Datei offen sein kann. Man kann allerdings 
dann noch eine sequentielle Datei öffnen, was aber später 
bei der Index-sequentiellen Dateiverwaltung besprochen 
werden soll. 

Zurück zu unserem OPEN: Mit dem L nach dem Namen 
wird der Floppy mitgeteilt, daß eine relative Datei geöffnet 
werden soll. Die CHR$-Sequenz teilt dem Laufwerk mit, wie 
groß ein einzelner Record, ein einzelner Datenblock werden 
soll (in unserem Beispiel 40 Zeichen lang). Allerdings muß 
man beachten, daß nach dem ersten Öffnen, also nach dem 
Initialisieren der Datei, dieser Wert immer gleich bleiben muß. 
Denn wenn man beim Initialisieren die Datenblöcke für 40 
Byte vorbereitet, und dann bei einem späteren Öffnen der 
Datei mitteilt, daß die Blöcke 80 Byte lang sein sollen, so wird 
sich das Laufwerk den Prozessor darüber zerbrechen, wie 
sie 80 Byte in 40 Stellen unterbringen soll. Wenn Sie die 
Datei zu einem späteren Zeitpunkt wieder benutzen wollen, 
werden Sie sich wundern, wie es in den einzelnen Records 
aussieht! 

Nach erstmaligem Öffnen der Datei muß diese noch einge¬ 
richtet werden, das heißt, Sie müssen der Floppy-Station mit- 
teilen, wieviele Records Sie bis auf weiteres benutzen 
wollen. Dazu müssen Sie den letzten Datensatz mit einem 
CHR$(255) markieren, worauf das Laufwerk alle noch nicht 
benutzten Datensätze selber einrichtet. Das kann eine Weile 
dauern, darum sollte man dieses Einrichten gleich am Anfang 
erledigen. Wenn später die Datei erweitert werden soll, muß 
man einfach den neuen letzten Datensatz einrichten. Neh¬ 
men wir an, Sie wollen 300 Records der Länge 40 freigeben: 
10 OPEN 2,8,3,"NAME,L,"+CHR$(40) 

20 OPEN 1,8,15 

30 PRINT#1,"P"+CHR$(3)+CHR$(300 AND255)+CHR$(300/ 
256)+CHR$(l) 

40 PRINT # 2,CHR$(255) 

50 INPUT # 1, A:CL0SE 1: CL0SE 2 : END 

In Zeile 10 wird, wie schon besprochen, die Datei eröffnet, 
in Zeile 20 der Kommandokanal, den man zum Positionieren 
des Records benötigt. 

Die Syntax des Positionierbefehls (Zeile 30), den man auf 
dem Kommandokanal senden muß, lautet wie folgt: 

PRINT # Kanal,"P"+CHR$(Sekundäradresse)+CHR$(Lo) + 


CHR$(Hi)+CHR$(Stelle) 

»P« Kennzeichen des Positionierbefehls 

Sekundäradresse: Sekundäradresse der relativen Datei 

im Open-Befehl 

Lo: niederwertiges Byte der Datensatz¬ 

nummer 

Hi: höherwertiges Byte der Datensatz¬ 

nummer 

Stelle: Die Nummer des Zeichens innerhalb 

eines Records (Datensatz), auf das 
positioniert werden soll. 

Somit wird in Zeile 30 auf das erste Zeichen des Record 
Nummer 300 positioniert. Die Aufspaltung der Record¬ 
adresse in Lo und Hi ist nötig, da mit einem CHR$-Befehle nur 
Werte zwischen 0 und 255 übergeben werden können, aber 
durchaus Datensatzadressen der Größe 500 oder 1000 
nötig werden können! 

In Zeile 40 wird dann ein CHR$(255) auf dem eigentlichen 
Dateikanal ausgegeben, was die Initialisierung startet. 

Zum Schluß wird dann die eventuell blinkende Fehler-LED 
gelöscht, und beide Kanäle geschlossen. 

Dieses Blinken sollte Sie beim Einrichten einer relativen 
Datei nicht irritieren, es tritt immer dann auf, wenn ein noch 
nicht existierender Record angesprochen werden soll. Falls 
die LED beim Einrichten einer größeren Datei überhaupt nicht 
leuchtet, so sollte Sie das nicht weiter stören, das ist normal. 
2.2 Beispiele 

1. Beispiel: 

10 OPEN 2,8,3,"NAME,L,"+CHR$(40) 

20 OPEN 1,8,15 

30 PRINT#1,"P"+CHR$(3)+CHR$(1)+CHR$(0)+CHR$(1) 

40 PRINT#2,"DAS IST JETZT WIRKLICH EIN LANGER 
TEXT! 

50 CiaTE 1 : CL0SE 2 : END 

Erklärung: Bei diesem Programm muß eigentlich nur 
erwähnt werden, daß in Zeile 40 beim PRINT # 2 ein Semiko¬ 
lon steht. Wie man oben beim OPEN-Befehl sieht, ist ein 
Datensatz 40 Zeichen lang, aber mit »Return« (also ohne das 
Semikolon) wäre der Text in Zeile 40 ganze 41 Zeichen lang! 

Wenn man jetzt diesen Text wieder lesen möchte, so muß 
man notgedrungen mit einer GET-Schleife arbeiten, da bei 
einem INPUT # bekanntlich ein »Return« gesucht wird. 

Wenn man mit INPUT arbeiten möchte, was trotz allem 
doch noch einige Vorteile bietet, muß man immer darauf ach¬ 
ten, daß kein PRINT # mit abschließendem Komma oder 
Semikolon vorkommt und im Record immer genügend Platz 
für ein »Return« bleibt. 

2. Beispiel: 

10 OPEN 2,8,3, "NAME,L,"+CHR$(40) 

20 OPEN 1,8,15 

30 PRINT#1, "P "+CHR$(3)+CHR$(l)+CHR$(0)+CHR$(1) 

40 G0SUB 100:PRINT A$ 

50 CL0SE 1: CL0SE 2 : END 

99 : 

100 A$=F0R I = 1 T0 40 

110 GET#2,B$:IF B$ =CHR$(255) THEN 130 
120 A$=A$+B$:NEXT 
130 RETURN 

Erklärung: Dieses Programm simuliert eine Art INPUT # in 
der Subroutine ab Zeile 100. Dort wird die maximale Anzahl 
zu holender Zeichen in der FOR-NEXT-Schleife festgelegt 
(gleich der Recordlänge), und dann so lange ein Zeichen 
nach dem anderen aus dem Record geholt, bis das nächste 
Zeichen ein CHR$(255) ist, das Leerkennzeichen. 

Wenn man einmal einen String von nur 30 Zeichen Länge 
in einem 40-Zeichen-Record mit einem PRINT #; ablegt, so 
haben die restlichen zehn Zeichen den Wert 255, was in die¬ 
ser GET-Routine also statt einem CHR$(13) als Endekenn¬ 
zeichen verwendet wird. 
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2.3 Index-sequentielle Dateien 

Dieser umständliche Name beschreibt etwas eigentlich gar 
nicht so Kompliziertes: Wie schon an verschiedenen Stellen 
angedeutet, kann man bei der 1551-Station nur eine sehr be¬ 
schränkte Anzahl Dateien gleichzeitig öffnen; nämlich drei 
sequentielle Dateien oder eine relative und eine sequentielle 
Datei. 

Diese Möglichkeit, gleichzeitig eine relative und eine 
sequentielle Datei zu öffnen, ist nun die Voraussetzung zur 
Index-sequentiellen Datenverwaltung. 

Nehmen wir einmal an, Sie wollen ein persönliches Adreß¬ 
register mit einem nicht zu kurzen Kommentar zu jeder einzel¬ 
nen Adresse oder Person aufbauen: Sie können jetzt eine 
Datei nach Namen, Wohnort oder Arbeitsort alphabetisch 
ordnen. Eine sehr aufwendige Methode wäre jetzt, drei kom¬ 
plette relative Dateien aufzubauen, eben eine nach Namen, 
die nächste nach Wohnort etc. alphabetisch geordnet. 
Darum werden Sie wohl eher nur eine relative Datei, nach 
Namen geordnet, aufbauen, dazu aber zwei sequentielle 
Dateien, in denen nur entweder die Wohnorte oder die Ar¬ 
beitsorte mit den entsprechenden Record-Nummern des 
eigentlichen Eintrags aufgeführt sind. 

Wenn man jetzt nach eingegebenen Namen suchen will, so 
tut man das direkt in der relativen Datei und hat somit sofort 
den richtigen Eintrag. Wenn man aber nach eingegebenem 
Wohnort sucht, sucht man diesen in der sequentiellen Datei, 
wo der Eintrag vielleicht so aussieht: »UNTERLUNK- 
HOFEN . . .0753«. Wie man sieht, gibt es hier maximal 9999 
Records und die maximale Länge des Ortes sind 16 Buchsta¬ 
ben. Man sucht also in der Wohnortdatei »Unterlunkhofen«, 
liest die entsprechende Recordnummer (hier: 753) und fin¬ 
det so den dazugehörigen Eintrag in der relativen Datei. 

Natürlich muß man nach jeder Änderung der relativen 
Datei, da diese ja auch neu sortiert werden muß, die entspre¬ 
chenden sequentiellen Dateien neu aufbauen. 

Anmerkung: Es wird wohl besser sein, wenn man auch die 
Namen der relativen Einträge in einer sequentiellen Datei sor¬ 
tiert hält, da das Umordnen innerhalb der relativen Datei mit 
den Kommentaren doch sehr mühsam werden kann! 


3. Random-Auess-Dateien 


Dieser Dateityp ist weder relativ noch sequentiell, oder bes¬ 
ser gesagt, es kommt ganz darauf an, wie Sie ihn organisie¬ 
ren. Denn Random-Access bedeutet freier Zugriff. Mit ande¬ 
ren Worten: Der Benutzer kann diese Art von Dateien verwal¬ 
ten, wie er will. Es ist nun nicht schwer zu verstehen, daß bei 
einer so flexiblen Dateienverwaltung das Lesen und Schrei¬ 
ben von Daten sehr umständlich werden kann. Darum wird in 
diesem Artikel auch nur das Grundsätzliche erläutert. 

Nun zur Datenstruktur: Die Daten werden in diesem Fall, 
anstatt wie bisher in Dateien, direkt in die einzelnen Blöcke 
auf der Diskette geschrieben. Man muß sich also immer sel¬ 
ber merken, wo jetzt welche Daten stehen. Das macht man 
am besten, indem man auf einem festdefinierten Block eine 
Tabelle der Adressen der einzelnen Datensätze unterhält. 
(Oder man legt eine sequentielle Datei an, in der dann diese 
Tabelle gespeichert ist.) Diese Struktur imitiert also in gewis¬ 
ser Weise die relative Dateiverwaltung der Floppy-Station, ist 
aber etwas schwerer zu handhaben. 

Man kann auch die sequentielle Datenstruktur imitieren, 
indem man am Anfang oder Ende eines jeden Datenblocks 
die Adresse des nächsten angibt. 

3.1 Zugriff auf Random-Access-Dateien 

Zuerst eine Liste sämtlicher neuer Befehle: 

PRINT #1, "Ul 3 0 X Y" 

PRINT#1, "U2 3 0";X;Y 


PRINT #1, "B-P 3 X" 

PRINT #1, "B-A X Y" 

PRINT #1, "B-F X Y" 

OPEN 2,8,3/'#" 

Man sieht, ganz normales Basic, aber die Anweisungen 
zwischen den Anführungszeichen sind für den Kommando¬ 
kanal des Laufwerks bestimmt, und bewirken dort etwas ganz 
Bestimmtes. (Kommandokanal zum Beispiel =OPEN1,8,15). 
Ul 3 0 x y: liest den Block (x,y) in den Puffer, der zur Se¬ 
kundäradresse 3 des Laufwerks 0 gehört. 

U2 3 0 x y: schreibt den Block (x,y) aus dem Puffer zur 
Adresse 3 auf die Diskette. 

B-P 3 x: richtet den Zeiger des Puffers mit der Adresse 3 auf 
das x-te Byte. 

B-A x y: sperrt den Block (x,y) in der BAM, der Block kann 
vor einem »Validate« (PRINT#1, "V") oder einem B-F durch 
reguläre Dateien oder Programme nicht mehr überschrieben 
werden. 

B-F x y: gibt den Block (x,y) wieder frei. 

OPEN 2,8,3,— #—: öffnet den Kanal 2 mit der Sekundär¬ 
adresse 3 als Datenpuffer. 

Eine Empfehlung: Im Prinzip gibt es statt U1,U2 die Befehle 
B-R, B-W, allerdings haben sie gewisse Tücken, die sie für 
den normalen Benutzer sehr unattraktiv machen. 

Vielleicht noch kurz ein Wort zur Blockstruktur auf Diskette: 
Spurnummer: Anzahl Sektoren: 

01-17 21 (00-20) 

18-24 19(00-18) 

25-30 18(00-17) 

31-25 17(00-16) 

Warnung: Die Spur 18 ist reserviert, hier befindet sich das 
Directory und die BAM! 

Alle diese Befehle und entsprechenden Fehlermeldungen 
sind im gewöhnlichen Floppy-Handbuch oder im Floppy- 
Buch voi i Markt&Technik besser und ausführlicher erklärt, es 
würde aber den Rahmen des Artikels sprengen, wollte ich 
hier alles aufführen. 

3.2 Beispiele 

Schreiben eines Textes in den Block (1,0) und Sperren des 
Blocks: 

10 OPEN 1,8,15 "I":OPEN 2,8,3,"#" 

20 PRINT#1, "B-P 3 0" 

30 PRINT#2, "HALLO DU DA!" 

40 PRINT#1, "U2 3 0 1 0":REM oder:,"U2";3;0;A;B, 
wenn A und B die Werte 1 und 0 haben. 

50 IF DS <> 0 THEN PRINT DS$:CL0SE 1: 

CLOSE 2 : END 
60 PRINT #1, "B-A 1 0" 

70 CLOSE 2:CLOSE 1:END 
Lesen dieses Textes und Freigeben des Blocks: 

10 OPEN 1,8,15, "I":0PEN 2,8,3,"#" 

20 PRINT# 1, "Ul 3 0 10" 

30 IF DSOO THEN PRINT DS$ CLOSE 1:CL0SE 2:END 
40 PRINT# 1, "B-P 3 0" 

50 PRINT# 1, T$:PRINT T$ 

60 PRINT# 1, "B-F 1 0" 

70 CLOSE 2:CLOSE 1:END 

3.3 Hash-Code-Dateien 

Dieser Dateityp beruht auf dem Random-Access-Prinzip 
und hat noch einen Schuß relativer Datenverwaltung in sich. 
Wie Sie sicher wissen, gibt es auf einer Diskette 664 frei 
benutzbare Blöcke, sofern keine Daten auf Diskette gespei¬ 
chert sind. 

Wenn Sie nun einen Datensatz speichern oder suchen 
möchten, addieren Sie einfach die ASCII-Werte der einzelnen 
Buchstaben des gesuchten Namens. Dieser wird dann durch 
eine geeignete Formel auf einen Wert zwischen 1 und 664 
gebracht. Alles übrige wie Punkt 3.1. 

(Germano Caronni/tr) 
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Sortieren - dos Chaos im Griff 


Es gibt wohl nichts Störenderes, als das Warten 
auf einen Computer, zum Beispiel beim Sortieren 
vieler Daten. Im folgenden Artikel zeigen wir 
Ihnen, wie Sie Ihre Nerven schonen können. 

W enn Sie mit der Ordnung auf Kriegsfuß stehen, haben 
Sie sicherlich schon wichtige Dinge, wie zum Bei¬ 
spiel den Taschenrechner, unter wilden Wutaus¬ 
brüchen vergeblich in Ihrem Schreibtisch gesucht, mit dem 
einzigen Erfolg, daß es danach noch unordentlicher aussah 
als zuvor. Man findet jedoch schnell heraus, daß die ewige 
Sucherei erhebliche Zeit in Anspruch nimmt. So ringt man 
sich vielleicht doch einmal dazu durch, eine gewisse Ord¬ 
nung unter seinen Sachen zu halten. 

Das gleiche Problem stellt sich auch bei Computern, die mit 
vielen verschiedenen Daten gefüttert wurden. Auch hier wird 
eine hohe Verarbeitungsgeschwindigkeit gefordert. So sol¬ 
len zum Beispiel bestimmte Daten möglichst schnell wieder¬ 
zufinden sein. In der Praxis werden dabei hauptsächlich zwei 
Methoden eingesetzt: 

1. Das Durchsuchen aller Datenelemente der Reihe nach in 
einer unsortierten Datei 

2. Das schnelle Suchen in einer sortierten Datei 
Die erste Methode ist die einfachste. Hierbei läßt man das 
gesamte Datenfeld von Anfang bis Ende durchsuchen, bis 
das gewünschte Element gefunden ist. Man erkennt schnell, 
daß diese Methode langsam ist; bedenkt man, daß man unter 
Umständen alle Datenelemente »abklappern« muß. Selbst die 
leistungsstärksten Computer benötigen heute viel Zeit, um 
viele Millionen Daten zu durchsuchen. Der Vorteil bei dieser 
Suchmethode ist aber, daß die Daten gänzlich durcheinander 
angeordnet sein dürfen. 

Die zweite Methode setzt ein sortiertes Datenfeld voraus. 
Um diese zu erklären, nehmen wir einmal an, daß ein Daten¬ 
feld eine gewisse Anzahl an aufsteigend sortierten Zahlen 
enthält. Darin soll nach einer bestimmten Zahl gesucht wer¬ 
den. Bei der binären Suche nimmt sich der Computer das in 
der Mitte der Datei stehende Datenelement heraus. Durch 
einen Größenvergleich mit der gesuchten Zahl wird sofort 
klar, ob die gesuchte Zahl schon gefunden wurde oder in der 
oberen oder der unteren Datenhälfte zu finden ist. Aus der 
entsprechenden Hälfte greift er sich nun wiederum das mitt¬ 
lere Element heraus und führt den eben genannten Vergleich 
ein zweites Mal durch, um herauszufinden, in welcher Teil¬ 
hälfte die gesuchte Zahl ist. Wenn man dieses Spiel weiter¬ 
treibt, bleiben zum Schluß nur zwei Zahlen übrig, von denen 
eine die gesuchte Zahl ist. Wie Sie sehen, halbiert sich die 
Zahl der zu durchsuchenden Elemente mit jedem Vergleich, 
wodurch natürlich die Suchzeit erheblich verringert wird. 
Diese Methode ist die schnellste und wird binäre Suche 
genannt. So sind zum Beispiel in einer 1000 Datensätze gro¬ 
ßen Datei nur maximal 10 Vergleiche notwendig, um einen 
beliebigen Satz zu finden. 

Wie gesagt, setzt diese Methode eine sortierte Datei vor¬ 
aus. Gerade hier ist Geschwindigkeit gefragt. 

Im allgemeinen hängt sie von zwei Faktoren ab: 

1. Wieviele Vergleiche müssen durchgeführt werden? 

2. Wieviele Daten müssen verschoben werden? 

Wir werden jetzt unterschiedliche Sortiermethoden ken¬ 
nenlernen, die alle das Ziel haben, die eben genannten Fakto¬ 
ren so klein wie irgend möglich zu halten. Doch werden wir 
feststellen, daß alle Algorithmen in bezug auf den Anfangszu¬ 
stand des zu sortierenden Feldes ihre Stärken und Schwä¬ 
chen haben. 


Viele unterschiedliche Algorithmen arbeiten oft nach glei¬ 
chen Kriterien, weswegen man sie auch zu bestimmten 
Gruppen zusammenfassen kann. Dabei kann man in vier 
Hauptgruppen unterteilen: 

1. Sortieren durch Einfügen 

2. Sortieren durch Auswählen 

3. Sortieren durch Austauschen 

4. Sortieren durch Zerlegen 


10 REM HAUPTPROGRAMM ZU DEN SORTIER- 
20 REM ALGORITHMEN. 

30 REM ES ERSTELLT EIN FELD MIT 
40 REM EINER BESTIMMBAREN ANZAHL 
50 REM ELEMENTEN. 

60 REM JEDES ELEMENT BESTEHT AUS 
70 REM DREI BELIEBIGEN BUCHSTABEN. 

BO REM DAS ENTSPRECHENDE SORTIER- 
90 REM UNTERPROGRAMM MUSS AB 
95 REM ZEILE 10000 GESCHEHEN. 

1000 PRINT "CCLRJ": CLR 
1005 COLOR 0,1: COLOR 1,6: COLOR 4,1 
1010 PRINT "DIESES PROGRAMM ERSTELLT ZUFAELLIGE" 
1020 PRINT "{DOWNJELEMENTE, DIE VON DEN SORTIERP 
ROGRAMMEN" 

1030 PRINT "IDOWNJSORTIERT WERDEN. JEDER SORTIER 
DURCHGANG" 

1040 PRINT "<DOWN>WIRD ANGEZEIGT." 

1050 INPUT "C2DQWNJWIEVIELE ELEMENTE";AN 
1060 IF ANC10 THEN PRINT "tDOWNJZU WENIG !": GOT 
0 1050 

1070 IF AN>10000 THEN PRINT " CDOWNJZU VIEL !": G 
OTO 1050 
1080 DIM A*<AN> 

1090 PRINT "12D0WNIDIE ELEMENTE WERDEN JETZT ERZ 
C UGT." 

109u JOSUB 4000: REM ** LINIE ZIEHEN 
1100 REM *** ELEMENTE ERZEUGEN *** 

1110 FOR A=1 TO AN 
1120 FOR B=1 TO 3 

1130 A*<A)= A*CA)+CHR*(INT<RND<TI>*25>+65> 

1140 NEXT B: NEXT A 

1150 GOSUB 5000: REM ** AUSGABE DER ELEMENTE 

1160 PRINT "{DOWNIDER SORTIERVORGANG BEGINNT." 

1161 PRINT 

1165 TI$="000000" 

1170 GOSUB 10000: REM *» SORTIERROUTINE 
1175 T*=TI* 

1180 GOSUB 4000: REM ** LINIE ZIEHEN 
1190 GOSUB 5000: REM ** AUSGABE DER ELEMENTE 
1195 GOSUB 3000: REM ** SORTIERART AUSGEBEN 
1200 PRINT "ID0WN1ES WURDEN"AN"ELEMENTE SORTIERT 

1210 PRINT "1D0WNJDIE BENOETIGTE ZEIT (HHMMSS):" 
T* 

1220 PRINT "T2D0WNIWOLLEN SIE NOCH EINMAL SORTIE 
REN ?" 

1230 GET KEY TA* 

1240 IF TA*="J" THEN 1000 
1250 END 

3000 REM **# AUSGABE SORTIERNAME *** 

3010 PRINT "CDOWNISORTIERART: "SA* 

3020 RETURN 

4000 REM *** LINIE ZIEHEN *** 

4010 FOR A=1 TO 40 
4020 PRINT 
4030 NEXT A 
4040 RETURN 

5000 REM *** AUSGABE DER ELEMENTE *** 

5010 FOR A=1 TO AN 
5020 PRINT A* CA)" "; 

5030 NEXT A: PRINT 
5040 RETURN 

10000 REM »** AN DIESER STELLE MUSS DAS 
10010 REM *** ENTSPRECHENDE SORTIER— 

10020 REM *** PROGRAMM ANGEHAENGT WERDEN 

Llsting 1. Das Hauptprogramm für die Sortierroutinen. Die 
entsprechende Routine wird einfach an dieses Programm 
angehängt. 
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Beginnen wir zunächst mit dem einfachsten Sortieralgo¬ 
rithmus. 


gleichen es mit dem zweiten. Sollte es größer sein, werden 
beide Elemente vertauscht. Nun nehmen wir das zweite Ele¬ 


Seine Funktionsweise ist am einfachsten zu verstehen, da 
man diese Methode im täglichen Leben am häufigsten ver¬ 
wendet, um irgend etwas zu sortieren. Er gehört zu der 
ersten der eben genannten Gruppen, sortiert also »durch 
direktes Einfügen« (englisch: straight insertion). 

Nehmen wir ein zufällig verteiltes Feld an. Der Sortieralgo¬ 
rithmus beginnt nun beim zweiten Element und vergleicht 
dies mit dem ersten. Ist es kleiner, werden beide vertauscht 
und sind somit schon sortiert. Jetzt folgt das dritte Element, 
das nun mit dem zweiten Element verglichen wird. Ist es grö¬ 
ßer, ändert sich nichts an der Ordnung. Sollte es jedoch klei¬ 
ner sein, wird es mit den vorigen Elementen verglichen, bis 
es sich am richtigen Platz befindet, an dem es dann eingefügt 
wird. Dasselbe geschieht auch mit dem vierten und allen wei¬ 
teren Elementen. Wenn das letzte Element seinen Platz 
gefunden hat, ist das Feld sortiert. 

Um diese Sortiermethode und auch alle folgenden in der 
Praxis zu erleben, ist in Listing 1 ein kleines Programm abge¬ 
druckt, das ein zufälliges Feld von Daten erzeugt, auf das Sie 
dann die Algorithmen anwenden können. Listing 2 zeigt ein 
Basic-Programm für den Plus/4, das die Sortiermethode 
Straight Insertion anwendet. Zum Ausprobieren muß es nur 
an Listing 1 angefügt werden. In Bild 1 haben wir das Vorge¬ 
hen von Straight Insertion zusätzlich als Flußdiagramm darge¬ 
stellt, um eventuelle Umsetzungen in andere Sprachen zu 
ermöglichen. 

Die notwendige Anzahl der Vergleiche und Verschiebun¬ 
gen kann jeweils in einer allgemeinen mathematischen For¬ 
mel beschrieben werden. So benötigen wir bei X Elementen 
(X 2 + X)/4 
Vergleiche und 
(X 2 + 9X)/4 

Bewegungen, um ein Feld vollständig zu sortieren. Diese 
mein zeigen jedoch die bestürzende Wahrheit über die Effek¬ 
tivität unseres ersten Algorithmus. Die Mathematiker unter 
Ihnen werden schon festgestellt haben, daß die Anzahl der 
Vergleiche und Bewegungen mit wachsender Elementzahl 
quadratisch ansteigt, was das X 2 in jeder Formel zeigt. Das 
bedeutet aber, daß bei doppelter Anzahl von Elementen die 
durchzuführenden Bewegungen und Vergleiche um das Vier¬ 
fache ansteigen. Wie sich das bei größeren Datenmengen 
auf die Sortierzeit auswirkt, dürfte wohl klar sein. 

Wir erkennen, daß diese Sortiermethode gerade bei sehr 
vielen Elementen sehr nachteilig ist. Wir müssen also nach 
anderen Methoden Vorgehen. 

Beim Sortieren könnte einem auch folgende, ebenfalls sehr 
einfache Methode einfallen: 

Dieses Mal beginnen wir mit dem ersten Element und ver¬ 


10000 REM *** STRAIGHT INSERTION #** 

10010 REM 

10020 SA*=”STRAIGHT INSERTION" 

10030 FOR X=2 TO AN 

10040 IF A*(X)S=A*(X-1) THEN 10120 
10050 REM ** EINFLIEGEN ** 

10060 X*=A*(X> 

10070 FOR Y=X—1 TO 1 STEP -1 
10080 A*(Y+l)=A*<Y) 

10090 IF X*<=A*(Y-1> THEN 10110 
10100 A*(Y)=X*: GOTO 10120 
10110 NEXT Y 

10120 GUSUB 5000: REM ** AUSGABE 
10130 NEXT X 
10140 RETURN 

10150 REM *** ENDE STRAIGHT INSERTION *** 
Listing 2. Der Algorithmus für Straight Insertion in Basic 
umgesetzt. Dieses Programm muß an das Hauptprogramm 
in Listing 1 angehängt werden. 



ment, das womöglich auch das erste sein kann, und verglei¬ 
chen dies mit dem dritten. Auch hier kommt es zu einem 
Tausch, falls das zweite größer ist. Und so geht es weiter, bis 
zum Ende der Datei. Wie Sie vielleicht erkannt haben, wurde 
damit das größte aller Elemente ganz nach hinten verscho¬ 
ben, und ist damit schon an seinem richtigen Platz. Jetzt wird 
das Feld um das bereits sortierte Element am Ende verklei¬ 
nert, und dann das gleiche Verfahren nochmals durchge- 



Bild 1. Das Flußdiagramm zu Straight Insertion 
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führt, was zur Folge hat, daß dieses Mal das zweitgrößte Ele¬ 
ment an den ihm zustehenden Platz befördert wird. Diese 
Prozedur wiederholen wir, bis das Feld nur noch ein Element 
enthält, welches dann natürlich das kleinste ist und ganz 
vorne steht. Sie sehen, wir sind dieses Mal von hinten an die 
Sache herangegangen, indem wir mit dem größten Element 
begannen. 

Diese Methode ist die bekannteste Art, Daten zu sortieren, 
und nennt sich »Bubblesort«. Der etwas sonderbare Name 
ergibt sich aus der Art, wie die einzelnen Elemente von vorne 
nach hinten »durchgeperlt« werden. So kann man sich, bei 
»herumgedrehtem« Feld, die einzelnen Elemente als Luftbla¬ 
sen (»Bubbles«) vorstellen, die im Wasser von unten nach 
oben aufsteigen. Auch hier soll wieder ein Flußdiagramm 
(Bild 2) verdeutlichen, was in Listing 3 realisiert wurde. 

Forschen wir nach Formeln, die die beiden Faktoren »Ver¬ 
gleiche« und »Bewegungen« beschreiben, werden wir auch 
bei Bubblesort wieder auf den lästigen Faktor X 2 stoßen: 
Vergleiche = (X 2 - X)/2 
Bewegungen = (X 2 - X)* 3/4 

Das heißt also, daß Bubblesort ebenso uneffektiv ist wie 
Straight Insertion. Mit einer kleinen Überlegung können wir 
Bubblesort so abändern, daß es etwas schneller wird. 

Bubblesort, so wie Sie es jetzt kennen, ist nicht besonders 
effektiv, da es einfach nach einem Schema alle Elemente 
durchläuft. Dabei kann es aber Vorkommen, daß ein Feld 
zufällig schon nach einigen wenigen Vertauschungen sortiert 
ist. Bubblesort merkt das nicht und sortiert weiter bis zum 
letzten Element. Man kann dies aber ändern, indem man 
abfragt, ob im vergangenen Durchgang überhaupt noch eine 
Vertauschung stattgefunden hat. Ist das nämlich nicht der 
Fall, liegt das Feld bereits sortiert vor. Man kann dies einfach 
durch einen Zeiger bewerkstelligen. 

Es läßt sich aber noch eine weitere Verbesserung anbrin¬ 
gen. So ist es durchaus möglich, daß durch die Vertauschun¬ 
gen in den vorigen Durchgängen ein Teil des Feldes bereits 
zufällig sortiert wurde. Um dies im Programm zu erkennen, 
setzt man eine weitere Variable ein, die die Elementposition 
der letzten Vertauschung angibt. Da ab dort das Feld schon 
sortiert sein muß, sortiert man dann einfach nur bis zur besag¬ 
ten Position, was natürlich wesentlich schneller sein kann. In 
Listing 4 sehen Sie diese Überlegungen bei Bubblesort in 
einem Basic-Programm verwirklicht. Um es auszuprobieren, 
müssen Sie es nur an das Anfangsprogramm in Listing 1 
anhängen. 

Mit ein bißchen Überlegung kann man seinen Algorithmus 
also durchaus optimieren, wie Sie es an Bubblesort gesehen 
haben. Bubblesort 2 ist gerade bei schon halbsortierten Fel¬ 
dern sehr gut verwendbar. Bei vollkommen vermischten Fel¬ 
dern ist es aber noch langsamer als sein Vorgänger, da die 
zusätzlichen Abfragen selbstverständlich auch kostbare 
Rechenzeit verschlingen. 


10000 REM *** BUBBLESORT 1 *** 

10010 REM 

10020 SA*="BUBBLESORT 1" 

10030 FOR X=AN—1 TO 1 STEP -1 
10040 FOR Y=1 TO X 

10050 XF At(YX=ftt(Y+l) THEN 10080 
10060 REM ** ELEMENTE AUSTAUSCHEN 
10070 S*=A*<Y>: A*(Y)=A*(Y+l): A*(Y+1)=S* 
10080 NEXT Y 

10090 GOSUB 5000: REM ** AUSGABE 
10100 NEXT X 
10110 RETURN 

10120 REM *** ENDE BUBBLESORT 1 *** 

Listing 3. Das bekannte Bubblesort als Basic-Programm 



Bild 2. So funktioniert Bubblesort 


SONDERHEFT 14 


67 






































GRUNDLAGEN 


C16, Plus/4 


Wir müssen jedoch erkennen, daß auch Bubblesort 2 nicht 
gerade die schnellste Sortiermethode ist. Befassen wir uns 
deshalb mit einem weiteren, noch sehr einfachen Sortieral¬ 
gorithmus. 


Straight Seledion 


Hier haben wir einen Algorithmus, der unter die Kategorie 
des Sortierens durch direktes Auswählen fällt. Die Funktions¬ 
weise von Straight Selection ist folgende: 

Zunächst sucht der Computer nach dem größten Element 
des Feldes. Nachdem er es gefunden hat, vertauscht er die¬ 
ses mit dem letzten Element, womit der größte Wert schon 
sortiert wäre. Wie bei Bubblesort wird nun das Feld um dieses 
eine letzte Element verkleinert und der gleichen Prozedur 
unterzogen. Das größte Element (also eigentlich das zweit¬ 
größte) wird gesucht und mit dem letzten Element des Teilfel¬ 
des vertauscht, das ja das zweitletzte Element des Gesamt¬ 
feldes ist. Wiederum verkleinert man das Feld um ein Element 
und so weiter. Ist die Restlänge des Feldes schließlich 1, muß 
dieses den kleinsten Wert enthalten und der Sortiervorgang 
ist beendet. 

Selbstverständlich können Sie auch immer das kleinste 
Element suchen und dieses dann jeweils mit dem ersten Ele¬ 
ment vertauschen. Es funktioniert in beiden Fällen. 


Um die Effektivität unseres neuen Algorithmus beurteilen 
zu können, sollen auch hier wieder die Formeln dienen, die 
die schon bekannten Zeitfaktoren »Vertauschungen« und 
»Bewegungen« berechnen: 

Vertauschungen = (X 2 - X)/2 
Bewegungen = X - 1 

Sie zeigen schon eine kleine Verbesserung gegenüber 
den ersten beiden Methoden. Doch tritt in einer Formel immer 
noch X 2 auf. Am besten arbeitet Straight Selection bei 
zufallsverteilten Feldern. Liegt aber ein bereits teilsortiertes 
Feld vor, kann der Algorithmus, wie er in Listing 5 realisiert ist, 
sehr langsam werden, da mit der Suche des größten Ele¬ 
ments von vorne begonnen wird. Ist Ihr Feld schon ein biß¬ 
chen sortiert, empfiehlt es sich, mit der Suche beim letzten 
Element anzufangen. Dazu müssen Sie in Listing 5 nur die 
FOR-NEXT-Schleife für das Suchen umdrehen und ein STEP 
-1 anfügen. Bild 3 zeigt das Flußdiagramm zu Straight Selec¬ 
tion. 


10000 
10010 
10020 
10030 
10040 
10050 
10060 
10070 
10080 
10070 
10100 
10110 
10120 
10130 
10140 
10150 
10160 
10170 
5 0180 
10190 
10200 
10210 

Listing 

aus. 


REM **•* BUBBLESORT 2 *** 

REM 

L IST POSITION BEIM LETZTEN 
TAUSCHEN 

F FLAG FUER VERTAUSCHUNG 


REM 
REM 
REM 
REM 

SA$="BUBBLESORT 2" 

L=AN—1 
FQR X=AN-1 TO 1 STEP -1 
F=0 

FOR Y=1 TO L 

IF A* (VX=AJ(Y+1) THEN 10150 
REM ** ELEMENTE AUSTAUSCHEN 
F=Y 

S$=A$(Y): A*(Y)=A*(Y+l): A*(Y+1)=S* 

NEXT Y 

L=F 

IF F=0 THEN 10200 

GOSUB 5000: REM ** AUSGABE 

NEXT X 

RETURN 

REM *** ENDE BUBBLESORT 2 *** 

4. So sieht die verbesserte Version von Bubblesort 
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10000 REM *** STRAIGHT SELECTION *** 

10010 REM 

10020 SA*="STRAIGHT SELECTION" 

10030 FOR X=AN TO 2 STEP -1 
10040 X*="" 

10050 FOR Y=1 TO X 

10060 IF A*<Y)>X* THEN X*=A*<Y>: Z=Y 
10070 NEXT Y 

10080 REM ** AUSTAUSCHEN 
10090 S$=A$(X): A*<X)=A*(Z>: A*(Z)=S* 
10100 GOSUB 5000: REM ** AUSGABE 
10110 NEXT X 
10120 RETURN 

10130 REM *»* ENDE STRAIGHT SELECTION *** 

Listing 5. Bei Straight Selection handelt es sich um den 
vom Prinzip her einfachsten Sortieralgorithmus. 



Bild 3. Straight Selection arbeitet nach dem Auswahlprinzip 
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Auch Straight Selection ist unter den bekannten Sortier¬ 
methoden nicht gerade die schnellste. Der Vorteil ist aber, 
daß sie, wie alle schon besprochenen, recht einfach arbeitet. 
Um eine gute Zeiteffizienz zu erhalten, muß schon etwas 
komplizierter gedacht werden, wie uns die nachfolgenden 
Sortierprinzipien beweisen werden. Stürzen wir uns nun auf 
den nächsten Algorithmus, der schon recht aufwendig ist. 

Shellsort 


Shellsort wurde nach seinem Entdecker D. L. Shell benannt, 
der sich zum Thema Sortieren einige neue Dinge hat einfallen 
lassen. Allgemein zählt man Shellsort zu der Klasse der Sor¬ 
tiermethoden durch direktes Einfügen, dessen Prinzip wir 
schon bei Straight Insertion erläutert haben. Shellsort geht 
dabei aber von einem anderen Ansatz aus. 

Shell erkannte, daß es sehr vorteilhaft ist, wenn man ein 
Element nicht nur mit seinen unmittelbaren Nachbarn ver¬ 
gleicht, sondern auch weiter entfernte Datenelemente in den 
Auswahlprozeß einbezieht. So vergleicht man nun nicht mehr 
das erste mit dem zweiten, sondern beispielsweise mit dem 
fünften. Das gesamte Feld wird dadurch grob, aber gleich¬ 
mäßig sortiert. Nun sortiert man das gleiche Feld ein zweites 
Mal, mit dem Unterschied, daß jetzt das erste Element nun 
nicht mehr mit dem fünften, sondern mit dem dritten Element 
verglichen wird. Mit jedem Sortiervorgang wird sozusagen 
das Raster der Sortierweise feiner und genauer, bis zur letz¬ 
ten endgültigen Sortierung mit dem Abstand 1. Verfolgen wir 
diesen Sachverhalt an einem richtigen Beispiel genauer. 
Betrachten Sie dazu Bild 4, das ein Ausgangsfeld zeigt, wel¬ 
ches die Ziffern Null bis Neun völlig zufallsverteilt beinhaltet. 
Darauf werden wir nun den Shellsort-Algorithmus anwenden. 

Üblicherweise beginnt Shellsort mit der Schrittweite X/2, 
also der Hälfte der Anzahl der Elemente des Gesamtfeldes. 
Bei zehn Elementen lautet sie demnach 5. Im ersten Schritt 
fassen wir nun jeweils die Elemente zu Gruppen zusammen, 
die den Abstand 5 zueinander haben. In unserem Fall besteht 
jede Gruppe dann aus zwei Elementen, wie Sie in Bild 4 fest¬ 
stellen können. Insgesamt haben wir fünf dieser Gruppen 
oder Untereinheiten. 

Was passiert jetzt? Nun, wir sortieren jede dieser Unterein¬ 
heiten für sich mit einem einfachen Sortieralgorithmus und 
schreiben sie dann an ihre ursprüngliche Position zurück. 
Straight Insertion ist dafür durchaus ausreichend. Bei zwei 
Elementen pro Gruppe ist dies ja sehr einfach. Wir vertau¬ 
schen die beiden, wenn das erste Element größer sein sollte. 
Aus (9,5) wird dann zum Beispiel (5,9). In Bild 4 können Sie 
das daraus entstandene grobsortierte Feld betrachten. Der 
erste Durchgang ist beendet. Danach halbieren wir die 
Schrittweite und vernachlässigen eventuelle Nachkomma¬ 
stellen, womit sich für den nächsten Schritt die Schrittweite 
2 ergibt. Nach gleichem Schema bilden wir wiederum Grup¬ 
pen, dieses Mal aber mit der neuen Schrittweite 2. Wir haben 
jetzt nur noch zwei Untereinheiten mit jedoch jeweils fünf Ele¬ 
menten. Jetzt sortieren wir wieder jede Gruppe einzeln, 
wobei das Resultat in Bild 4 zu erkennen ist. Damit haben wir 
das Feld schon etwas feiner sortiert. So sind die größeren 


Werte schon nach hinten gerutscht, während sich die kleine¬ 
ren im vorderen Teil des Feldes befinden. Schließlich lautet 
die Schrittweite nur noch 1. Nun wird also das gesamte Feld 
noch einmal vollständig durchsortiert und das Programm 
beendet. 

Nach bereits drei Durchläufen ist das Feld schon vollkom¬ 
men sortiert, was zeigt, daß Shellsort ziemlich schnell arbei¬ 
tet. Nun könnte man annehmen, daß jeder Durchgang doch 
recht lange dauern muß, da man aufgrund der vielen Unter¬ 
einheiten sehr oft sortiert. Das trifft insbesondere zu, wenn 
man das langsame Prinzip von Straight Insertion verwendet. 
Die Überlegung ist eigentlich auch richtig, doch werden die 
Untereinheiten mit jedem Schritt geordneter, womit auch das 
Sortieren immer schneller geht. Selbst der letzte Schritt, bei 
dem das gesamte Feld noch einmal komplett sortiert wird, 
geschieht verhältnismäßig schnell, da dies schon so ange¬ 
ordnet ist, daß nur wenige Bewegungen nötig sind. 

Besonders auffallend ist bei Shellsort die geringe Anzahl an 
Durchläufen (bei zehn Elementen drei Durchläufe), die sich 
gerade bei großen Datenfeldern positiv auswirkt. So haben 
wir es bei Shellsort schon mit einem recht schnellen Algorith¬ 
mus zu tun. Im übrigen können für die Schrittweite zur Bil¬ 
dung der Untereinheiten auch andere abfallende Reihen ver¬ 
wendet werden, die mit 1 aufhören. Studien ergaben nämlich, 
daß die Schrittweite bei Shellsort bei der Geschwindigkeit 
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Ergebnis nach 3 Durchläuten 


Bild 4. Beispiel für die Arbeit von Shellsort. 


ARRAY FUER UNTEREIN¬ 
HEITEN 

ANZAHL ELEMENTE 
UNTEREINHEITEN 


IN 


lOOOO REM *** SHELLBÜRT *** 

10010 REM 
10020 REM AA*() 

10030 REM 
10040 REM AA 
10050 REM 
10060 SA*="SHELLSORT" 

10u.iP DIM AA* (AN) 

10080 S=INT(AN/2): REM SCHRITTWEITE 

10090 FÜR X=1 TQ S 

10100 FÜR Y=1 TO INT(AN/S) 

10110 AA*(Y)=A*((Y-1)*S+X) 

10120 NEXT Y 

10130 AA=Y—1 

10140 SOSUB 20000 

10150 FOR Y=1 TO INT(AN/S) 

10160 A*((Y-1)*S+X)=AA*(Y> 

10170 NEXT Y 
10180 NEXT X 
10190 S=INT(S/2) 

10200 GOSUB 5000: REM ** AUSGABE 
10210 IF S THEN 10090 
10220 RETURN 

10230 REM *** ENDE SHELLSORT *** 

10240 REM 
10250 REM 

20000 REM ** UNTERPROGRAMM SORTIEREN ** 
20010 REM ** STRAIGHT INSERTION ** 

20020 REM 

20030 FOR X X=2 TO AA 

20040 IF AA*(XX)>=AA*(XX—1) THEN 20120 
20050 REM * ELEMENT EINFUEGEN * 

20060 XX*=AA*(XX) 

20070 FOR YY=XX—1 TO 1 STEP -1 
20080 AA*(YY+1)=AA*(YY) 

20090 IF XX*< =AA*(YY—1) THEN 20110 
20100 AA*(YY)=XX*: GOTO 20120 
20110 NEXT YY 
20120 NEXT XX 
20130 RETURN 

20140 REM ** ENDE UNTERPROGRAMM ** 

Listing 6. Shellsort besteht eigentlich aus zwei Algorith¬ 
men, wobei es sich bei dem zweiten um Straight Insertion 
handelt. 
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von großer Bedeutung ist. Probieren Sie doch einmal andere 
Reihen aus, und vergleichen Sie den Zeitunterschied. 

Als Algorithmus, der die Gruppen sortiert, haben wir im 
Falle unseres Basic-Programms in Listing 6 den einfachsten, 
nämlich Straight Insertion, verwendet. Es können aber auch 
andere Methoden in das Programm eingefügt werden. Was 
eventuell einen weiteren Geschwindigkeitsgewinn bringt, ist 
vielleicht Bubblesort 2, das sich gerade bei teilsortierten Fel¬ 
dern bewährt hat. 

Obwohl Shellsort erheblich schneller als die anderen 
schon besprochenen Sortieralgorithmen arbeitet (das Ver¬ 
hältnis liegt etwa bei X zu X' 2 ), hat auch er seine Schwä¬ 
chen. So versagt er bei umgekehrt sortierten Feldern kläglich 
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und ist dann keinesfalls mehr als schnell zu bezeichnen. Bei 
zufallsverteilten Elementen gehört er aber mit zu den schnell¬ 
sten. 

Shellsort (Bild 5) war schon ein recht komplexer Algorith¬ 
mus, der auch beim Programmieren einigen Aufwand dar¬ 
stellt. Die nächste Methode dürfte allerdings noch einige 
Grade komplizierter sein, da hier ein völlig anderes Konzept 
zugrunde liegt. 

Sortieren mit »Bäumen«: Heapsort 


Heapsort ist zwar durch seine vollkommen andere Struktur 
der wohl am schwersten zu verstehende Algorithmus. Aber 
gerade das macht es so reizvoll, die Funktionsweise verste¬ 
hen zu lernen. Um das möglichst einfach zu gestalten, fangen 
wir ganz unten an und bauen dann logisch auf unser bisheri¬ 
ges Wissen auf. Das Wichtigste, was Sie bei Heapsort wissen 
müssen, ist, daß er mit Bäumen arbeitet. Damit sind aber kei¬ 
nesfalls die Bäume in Ihrem Garten gemeint, sondern die 
mathematischen Bäume. 

Ein mathematischer Baum ist eine Menge von Elementen, 
die in einer bestimmten Anordnung vorliegen. Anders, als 
beim »richtigen« Baum, wachsen die mathematischen Äste 
nach unten. Bild 6 zeigt beispielsweise eine solche Baum¬ 
struktur. Wir können diese an sich zweidimensionale Struktur 
auf einfache Weise in ein eindimensionales Feld transformie¬ 
ren. Dazu schreiben wir die Inhalte aller Knoten der Reihe 
nach von oben nach unten auf. Sie können das in Bild 7 nach¬ 
vollziehen, das unseren Baum in Bild 6 als Feld darstellt. Eine 
derartige Struktur bezeichnet man auch als Heap (deutsch: 
Haufen). 

Mathematisch versierte Leser werden aus diesem Feld 
eine bes» iders einfache Struktur erkennen: Jedes Element 
mit der Position E ist in dieser Anordnung immer kleiner als 
das Element INT(E/2). Das ist zwar verblüffend, kann aber 
durch Nachrechnen bestätigt werden. So haben wir dem¬ 
nach eine äußerst simple Regel, eine solche Heap-Struktur 
zu erzeugen. Es muß gelten: 

A$(INT(E/2)) ^ A$(E) für alle E mit 2 ^ E ^ X 

X ist hierbei wieder die Gesamtanzahl der zu sortierenden 
Elemente. 

Sie sehen, daß sich ein Heap sehr gut zum Sortieren eig¬ 
net, da er schon in einer gewissen Weise vorsortiert ist. Und 
das schönste bei der Sache ist, daß immer das erste Element 
das allergrößte ist. Wer das nicht glaubt, kann mit der obigen 
Regel mehrere Heaps erzeugen, um dann festzustellen, daß 
es stimmt. Haben wir einmal unsere Heap-Struktur, nehmen 



Bild 6. Mögliche Konstruktion eines Baumes 



Bild 7. So wird der Baum in Bild 6 in einem eindimensionalen 
Feld abgelegt 
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Bild 8. Das »Abschöpfen« eines Heap. Das oberste (erste) Element wird jeweils weggenommen. 


wir einfach das erste Element und haben damit bereits das 
größte. Dann bleibt uns nur noch die Aufgabe, den Baum wie¬ 
der zusammenzukitten, wobei wieder das im verbleibenden 
Baum größte Element nach oben kommt. So kann man das 
zweitgrößte Element von oben wegnehmen und das Ganze 
soweit fortführen, bis der Heap nur noch ein Element hat. In 
Bild 8 ist dieser Sachverhalt grafisch dargestellt. 

Das Gefühl ist etwa dasselbe, als wenn man von einer 
Kanne stehengelassener Milch Schicht um Schicht die 
Sahne abschöpfen kann. Dieser Vergleich hinkt lediglich in 
der Beziehung, daß die Milch nach einiger Zeit keine Sahne 
mehr absetzt. Die Heapsort-Methode läßt uns aber vom 
ersten bis zum letzten Element »genießen«. 

Um auch hier eine Vorstellung vom Geschwindigkeitsge¬ 
winn zu bekommen, sollten Sie die Formel für die Anzahl der 
mittleren Bewegungen erfahren: 

Bewegungen 0.5 * X * ld(X) 

ld(X) ist dabei der Logarithmus von X zur Basis 2. 

Sie sehen, daß bei dieser Methode der lästige Faktor X 2 
weggefallen ist und der sehr viel kleinere Faktor ld(X) hinzu¬ 
kam, was eine viel höhere Geschwindigkeit zur Folge hat. 

Das etwas komplizierte Flußdiagramm in Bild 9 zeigt noch 
einmal die Arbeitsweise von Heapsort. Die Realisierung im 
Basic-Programm ist in in Listing 7 zu sehen. Zunächst bauen 
wir aus einem zufällig verteilten Feld den Heap auf. Dazu ver¬ 
wenden wir die, uns bekannte, einfache Regel, die die Ord¬ 
nung in einem Heap festlegt. Danach »schöpfen« wir bereits 
das erste Element ab, das, wie Sie wissen, das größte ist und 
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REM *** HEAPSORT *** 

REM 

SA$="HEAPSORT" 

LG=INT(AN/2)+1: RG=AN 
IF RG<=1 THEN 10190 
IF LG<=1 THEN 10090 
REM ** HAUFEN AUFBAUEN ** 

LG=LG—1 

I=LG: GOTO 10130 

REM ** MAXIMUM WEGNEHMEN ** 

S*=A$(1>: A*(1)=A*<RG): A*(RG)=S* 

RG=RG—1 
1 = 1 

X*=A*CI) 

P=0: REM FLAG : NICHT GEFUNDEN 
IF 2*I<=RG AND P=0 THEN 10200 
A*(I)=X* 

REM BOSUB 5000: REM AUSGABE 

GOTO 10040 

RETURN 

REM * A*CI> EINORDNEN * 

J=2*I 

IF J<RG THEN IF A*(J)<A*<J+l) THEN J=J+1 

IF X*>=A*(J) THEN 10260 

A*(I)=A*(J) 

I=J: GOTO 10150 

P=l: REM PLATZ GEFUNDEN 

GOTO 10150 


Listing 7. Heapsort zählt zu den kompliziertesten Algorith¬ 
men. Er besticht durch seinen logischen Aufbau und die 
verblüffend hohe Arbeitsgeschwindigkeit. 
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hängen es an den Schluß unseres Feldes. Um dieses letzte 
Element verkürzt, bilden wir dann den Heap neu. So kann es 
insbesondere nach dem ersten Durchlauf Vorkommen, daß 
Teile des Feldes schon in Heapform sortiert sind, wodurch 
man nicht noch einmal vollständig durchsortieren muß. Unser 
Basic-Programm in Listing 7 hat auch dies berücksichtigt. 

Und wieder wird das oberste (erste) Element weggenom¬ 
men und jetzt an die vorletzte Position gebracht. Dies wieder¬ 
holt sich, bis sich im Heap nur noch ein Element befindet, das 
das Kleinste sein muß. Zum Ausprobieren hängen Sie einfach 
Listing 7 an unser Hauptprogramm in Listing 1. 

Damit haben Sie einen Sortieralgorithmus kennengelernt, 
der mit zu den schnellsten gehört und wegen seiner anders¬ 
artigen Struktur wohl auch der interessanteste ist. 

Mit Heapsort ist die Palette der Algorithmen zum Sortieren 
noch nicht erschöpft. Gerade in Sachen Geschwindigkeit, 
die uns besonders interessiert, ist Heapsort durchaus noch 
zu schlagen. Wir wollen deshalb jetzt zu der Sortiermethode 
kommen, die für allgemeine Sortierprobleme die schnellste 
ist. 

Quicksort 


Quicksort wurde von R. Hoare im Jahre 1962 entwickelt. 
Trotz seiner Geschwindigkeit muß man aber nicht vermuten, 
hier einen noch komplexeren Algorithmus vorzufinden als bei 
Heapsort. Er ist sogar etwas leichter zu verstehen. Quicksort 
geht nämlich einen vollkommen anderen Weg, als die ande¬ 
ren Sortieralgorithmen. 

Man beginnt damit, daß man aus dem Gesamtfeld irgendein 
beliebiges Element herausnimmt, das nun als Vergleichswert 
dienen soll. So werden jetzt alle Elemente, die kleiner als 
unser Vergleichswert sind, links davon gesetzt und alle 
Werte, die größer sind, rechts davon. Es entsteht ein Feld, 
von dem alle kleineren Elemente auf niedriger und alle größe¬ 
ren Elemente auf höherer Position stehen. So ist das Feld in 
gewisser Weise schon vorsortiert. Durch unseren Ver¬ 
gleichswert getrennt, enstehen zwei neue Teilfelder. Eines 
mit den kleineren und eines mit den größeren Werten. Aus 
jedem dieser Teilfelder pickt man sich jeweils ein neues Ver¬ 
gleichselement heraus, an dem nun die Werte der Teilfe|der 
jeweils wieder nach der anfänglich beschriebenen Weise 
weitersortiert werden. Dadurch entstehen vier noch kleinere 
Teilfelder, bei denen nach dem gleichen Prinzip verfahren 
wird und so weiter. Irgendwann enthält jedes Teilfeld nur noch 
ein Element, womit das Sortieren dann abgeschlossen wäre. 

Das Verfahren ist soweit ganz einfach. Nun stellt sich das 
Problem beim Holen des Vergleichswertes, den möglichst 
optimalen herauszufinden. Das wäre zweifelsohne der Wert, 
der etwa das arithmetische Mittel aller Elemente darstellt. 
Eine derartige Abfrage würde aber gewiß so komplex wer¬ 
den, daß der ganze Zeitgewinn des Algorithmus wieder verlo¬ 
ren wäre. Der Einfachheit halber nimmt man daher immer das 
mittlere Element des Feldes. Dabei können unter Umständen 
zwar recht ungleiche Teilgruppen entstehen, wenn man zum 
Beispiel zufälligerweise den zweit- oder dritthöchsten Wert 
des Feldes erwischt. Doch kann die Wahl auch ebenso gün¬ 
stig ausfallen, wenn das Feld einigermaßen zufallsverteilt ist. 

Vielen wird bei der Beschreibung des Algorithmus aufge¬ 
fallen sein, daß das Gesamtprinzip in den Teilfeldern immer 
wieder gleich ist, daß heißt die gleichen Berechnungen wie¬ 
der und wieder in den kleineren Teileinheiten vorgenommen 
werden. So stellen wir fest, daß es recht einfach wäre, wenn 
das Programm, das den Algorithmus beinhaltet, zu diesem 
Zweck sich immer wieder selbst aufrufen könnte und haben 
damit ein wichtiges Merkmal von Quicksort angesprochen. 
Die Sortiermethode Quicksort kann rekursiv programmiert 
werden. Ein Programm arbeitet rekursiv, wenn es sich immer 
wieder selbst aufruft, um zu einem Ergebnis zu gelangen. 


Dabei steigt es immer tiefere Ebenen hinab, bis ein eindeuti¬ 
ges Ergebnis vorhanden ist, um die Teilergebnisse der ver¬ 
schiedenen Ebenen und schließlich das Gesamtergebnis 
berechnen zu können. Übersetzt heißt rekursiv auch »auf 
sich selbst zurückgreifend«. 

Quicksort steigt während der Aufteilung in immer kleinere 
Teilfelder in mehrere Rekursionsebenen hinab, bis die Teilfel¬ 
der schließlich nur noch ein Element enthalten. 

Die rekursive Methode ist im Gegensatz zu einem linearen 
Lösungsversuch sehr elegant. Das große Problem ist aber 
hierbei die Programmiersprache, in der wir den Algorithmus 
formulieren wollen. Basic bringt nämlich bei der Programmie¬ 
rung von Rekursionen einige Schwierigkeiten mit sich, da 
diese Sprache sehr unstrukturiert ist. 

Um dies zu verstehen, machen wir einen Abstecher in die 
Programmiersprache Pascal. Dort sind nämlich sämtliche 
Unterprogramme (Prozeduren und Funktionen) vom Haupt¬ 
programm vollkommen unabhängig. Sämtliche Variable, die 
das Unterprogramm benutzt, sind nur diesem selbst zugäng¬ 
lich, dem Hauptprogramm und anderen Unterprogrammen 
aber nicht. Man nennt diese Variable auch lokale Variable. So 
ist eine Variable A im Unterprogramm nicht dieselbe wie eine 
im Hauptprogramm definierte Variable A. 

Ruft sich ein Pascal-Unterprogramm selbst auf, so sind 
auch in den verschiedenen Rekursionsebenen die entspre¬ 
chenden Variablen lokal, das heißt für die übergeordneten 
Rekursionsebenen nicht zugänglich. 

Im Commodore-Basic aber ist das nicht der Fall. Jede Varia¬ 
ble, wann immer sie auch definiert wird, ist an jeder Stelle im 
Programm definiert und kann verändert werden. Da Quicksort 
aber bei jedem Durchlauf des Unterprogramms Werte 
erzeugt (linke und rechte Grenze der Teilfelder), die nur für 
die aktuelle Rekursionebene gültig sind, muß ein weiteres 
FWd '«»gelegt werden, in denen diese Werte entsprechend 
ihrer Rekursionsebene abgelegt werden. Das ist natürlich 
eine recht umständliche Art der Programmierung; in Basic 
aber nicht anders zu lösen. Listing 8 zeigt das Basic- 


10000 REM *** QUICKSORT REKURSIV *** 

10010 REM 

10020 REM LG IST LINKE GRENZE 
10030 REM RG IST RECHTE GRENZE 
10040 REM VG* IST VERGLEICHSELEMENT 
10050 REM 

10060 DIM LG(100),RG(100) 

10070 Z=0: LG(1)=1! RG(1)=AN 
10080 GOSUB 10200: REM ** QUICKSORT 
100*70 RETURN 

10100 REM *** ENDE BUICKSORT *** 

10200 REM ** EINSPRUNG REKURSIVSCHLEIFE ** 
10210 Z=Z+1 

10220 IF LG < Z)>=RG(Z) THEN 10370 
10230 X=LG(Z>: Y=RGCZ> 

10240 REM * VERGLEICHSELEMENT 
10250 VG*=A*(INT<<X+Y)/2>> 

10260 DO UNTIL X>Y 

10270 DO WHILE AilXXVGt: X=X+1: LOOP 
10280 DO WHILE A*(Y)>VG*: Y-Y-l: LOOP 
10290 IF X>Y THEN EXIT 

10300 S*=A*(X>: AS(X)=A*(Y): A*(Y>=S* 

10310 X=X+1 
10320 Y=Y-1 
10330 LOOP 

10340 GOSUB 5000: REM ** AUSGABE 
10350 RG < Z+l)=Y: LG<Z+l)=LG<Z): GOSUB 10200 
10360 LG(Z+l)=X: RG(Z+l)=RG(Z): GOSUB 10200 
10370 Z=Z-1 

10380 RETURN : REM ** RUECKSPRUNG AUS REKUR- 
10390 REM SIONSEBENE 

Listing 8. Quicksort ist der König aller Sortieralgorithmen. 
Seine Geschwindigkeit ist auch heutzutage noch maß¬ 
gebend, obwohl dieser Algorithmus schon vor mehr als 
20 Jahren entwickelt wurde. 
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Programm zu Quicksort mit der eben besprochenen rekursi¬ 
ven Methode. Es wäre sicherlich möglich, auch ein lineares 
Programm zu diesem Algorithmus zu entwerfen, würde wahr¬ 
scheinlich aber zu komplex werden. Wollen Sie die beson¬ 
ders effektive Quicksort-Routine in einer anderen, womög¬ 
lich strukturierten Sprache (zum Beispiel Pascal) formulieren, 
wird Ihnen das Flußdiagramm in Bild 10 helfen. 

In bestimmten Fällen ist Quicksort allerdings alles andere 
als schnell. Bei Feldern, die umgekehrt, das heißt in abstei¬ 
gender Reihenfolge, vorliegen, entpuppt Sich Quicksort näm¬ 
lich als sehr langsam. In diesem Fall wird es sogar von Bub¬ 
blesort 2 übertroffen. Bei zufallsverteilten Feldern jedoch ist 
Quicksort nicht zu schlagen. Das »nicht zu schlagen« bezieht 
sich an dieser Stelle natürlich auf Standard-Algorithmen. 
Speziallösungen für bestimmte Problemfälle sind hier nicht 
berücksichtigt. 

Nachdem Sie nun die wichtigsten und bekanntesten 
Sortieralgorithmen kennengelernt haben, soll abschließend 
noch ein Wettrennen zwischen allen besprochenen Metho- 



Bild 10. Die Arbeitsweise von Quicksort 


den veranstaltet werden. Um jedes Sortierprogramm mög¬ 
lichstschnell zu machen, wurden sämtliche REM-Zeilen und 
überflüssigen Leerzeichen entfernt. Jeder Algorithmus 
bekam nun die Aufgabe, 100, 200 und 500 zufällig verteilte 
Elemente zu sortieren. Die dazu benötigten Zeiten sind in Bild 
11 in einer Tabelle abgedruckt und in Bild 12 zur Veranschau¬ 
lichung im Balkendiagramm dargestellt. Die Zeiten beziehen 
sich dabei, wie gesagt, auf vollkommen ungeordnete Felder. 
So kommen gewisse Spezialisten, die nur in einigen Sonder¬ 
fällen besonders effektiv sind, nicht zur Geltung. Bubblesort 
2 wäre ein solcher Vertreter, da er bei zufällig verteilten Fel¬ 
dern extrem langsam arbeitet, bei teilsortierten Feldern aber 
sogar schnellere Algorithmen überbietet. Durch Ausprobie¬ 
ren werden Sie sicherlich unter den vorgestellten Algorith¬ 
men den für Ihr spezielles Sortierproblem optimalen heraus¬ 
finden. (M. Thomas/ks) 


Sortierart 

sort 

100 

erte Eleme 

200 

nte 

500 

1. Straight Insertion 

2. Bubblesort 1 

3. Bubblesort 2 

4. Straight Selection 

5. Shellsort 

6. Heapsort 

7. Quicksort 

0:50 min 

1:48 min 

1:51 min 
0:46 min 
0:42 min 
0:37 min 
0:31 min 

3:07 min 
7:20 min 
7:31 min 
2:57 min 
1:35 min 
1:28 min 
1:08 min 

20:24 min 
46:08 min 
50:15 min 
49:41 min 
4:42 min 
4:13 min 
3:07 min 


Bild 11. Die Tabelle der Wahrheit. Die Zeiten sind jeweils in 
Minuten und Sekunden angegeben. 



Bild 12. Die Tabelle von Bild 11 noch einmal in grafischer Dar¬ 
stellung. 
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SOFTWARE-TEST 


Anwendungs-Software 

für den C16, C116 und Plus/4 

Gute Anwendungsprogramme wie Textverarbeitungen oder Dateiverwaltungen können dem 
Benutzer eine wertvolle Hilfe bei Routinearbeiten sein. Sie sind, neben den Spielen, 
der Hauptanschaffungsgrund für einen Heimcomputer vom Schlage eines C16 oder Plus/4. 

Wir haben aus der spärlichen Anzahl von Software auf dem Markt vier erwähnenswerte Programme 

unter die Lupe genommen. 


D ie erste Software, die wir Ihnen vorstellen möchten, ist 
ein Malprogramm. Mit ihm kann man auf dem Bildschirm 
farbig malen, Zeichnungen erstellen und wieder Kor¬ 
rekturen ausführen. Standard sind auch Hilfsfunktionen zum 
einfachen Zeichnen von Kreisen, Rechtecken und zum Aus¬ 
füllen von Flächen. 

Lobenswert ist, daß »Paintbox« nicht nur mit dem Joystick, 
sondern auch mit den Cursortasten bedient werden kann 
(nicht jedermann hat einen Joystick). Als erstes meldet das 
Programm in der unteren Bildschirmhälfte ein Auswahlmenü. 
Durch Links- oder Rechtsbewegungen des Joysticks oder 
mit den Cursortasten kann man sich einen Befehl aussuchen 
und mit dem Feuerknopf oder einer der beiden SHIFT-Tasten 
anwählen. 

Welche Befehle kennt das Programm? Die wichtigste Funk¬ 
tion ist das Wählen der »Strichstärke«: Damit ist die Breite der 
Linien gemeint, die man auf dem Bildschirm zeichnen kann. 
Die Auswahlmöglichkeiten reichen vom Setzen einzelner 
Punkte bis hin zum automatischen Setzen von jeweils drei 
Punkten nebeneinander. Die Geschwindigkeit, mit der man 
seinen Malstift über den Bildschirm bewegt, kann eingestellt 
werden. 

Paintbox 


Mit Paintbox lassen sich nicht nur Striche zeichnen, son¬ 
dern auch zum Beispiel Rechtecke oder Kreise. Man wählt im 
Menü den Befehl »CIRCLE« zum Kreisezeichnen an. Wenn 
man nun einen Punkt auf den Bildschirm setzt, wird dieser als 
Mittelpunkt eines Kreises erkannt. Durch Drücken des Joy¬ 
sticks in eine beliebige Richtung ändert sich die Größe des 
Kreises. Ein weiterer Druck auf den Feuerknopf fixiert die 
Größe des Kreises, der nun noch beliebig über den Bild¬ 
schirm bewegt und somit genau positioniert werden kann. 

Auf dieselbe Weise kann man auch Rechtecke oder Qua¬ 
drate zeichnen. Wird die Funktion »BOX« angewählt, füllt der 
Computer das entstandene Viereck gleich mit der gerade 
gewählten Farbe aus. Apropos Farbe: Paintbox gestattet auf 
einem jeweils 8 mal 8 Punkte großen Bildausschnitt die 
gleichzeitige Verwendung von vier verschiedenen Farben, 
die beliebig gewählt werden können. Daher sind mit Ein¬ 
schränkungen alle 16 Farben des C16 mit jeweils acht Farb¬ 
tönen darstellbar. Eine dieser Farben ist jedoch immer iden¬ 
tisch mit der Hintergrundfarbe, kann somit also beispiels¬ 
weise zum Löschen oder Korrigieren verwendet werden. 

Natürlich kann man seine Kunstwerke auch auf Diskette 
oder Kassette speichern und wieder laden, wobei bei Kas¬ 
settenbetrieb mit erheblichen Wartezeiten gerechnet wer¬ 
den muß. 

Als besonders schmerzlich erweist sich das Fehlen einer 
»ZOOM«-Funktion zum Vergrößern einzelner Bildaus¬ 
schnitte. Kleine Figuren oder Schrift zu zeichnen ist fast 

asa? 


unmöglich, da selbst auf einem Monitor mit scharf eingestell¬ 
tem Bild die einzelnen Bildpunkte kaum zu erkennen sind. 
Ebenso fehlt eine Hardcopy-Funktion zum Ausdrucken der 
entstandenen Meisterwerke. Alle Hobbymaler, die sich ihre 
eigene Galerie aufbauen möchten, werden also enttäuscht. 
Leider fehlt in der Anleitung auch ein Hinweis, wie man einmal 
erstellte Grafiken und Bilder in selbstgeschriebenen Pro¬ 
grammen verwenden kann. 

Paintbox ist sicherlich kein außergewöhnliches Programm, 
bietet aber für den Preis von 25 Mark (sowohl für die 
Disketten- als auch Kassettenversion) einigen Malspaß. 

Text C16 


Was kann man als Computer-Besitzer mit einer Text¬ 
verarbeitung anfangen? Man kann Briefe schreiben, aus- 
druc Uo und sogar Telefonnummern oder andere Daten 
notieren und auf einem Drucker ausgeben lassen. Der größte 
Vorteil aber ist, daß man Korrekturen und Schreibfehler sofort 
ausführen kann, ohne den ganzen Text noch einmal schrei¬ 
ben zu müssen. Schauen wir uns also das Programm »Text 
CI6« einmal näher an. 

Das Laden des Programms, das nur auf Kassette erhältlich 
ist, stellt den Anwender auf eine harte Geduldsprobe: Ganze 
siebeneinhalb (!) Minuten benötigt der Ladevorgang. Danach 
befindet man sich sofort im Texteingabe-Modus. Maximal 72 
Zeilen mit je 70 Zeichen Text kann man nun eingeben, was 
nicht gerade viel ist (ungefähr eine DIN-A4-Seite). Längere 
Liebesbriefe müssen also in mehrere Teile zerlegt werden. 
Gut gelöst wurde die Scroll-Routine: Werden in eine Zeile 



ln wenigen Minuten sind mit dem Programm »Paintbox« sol¬ 
che farbige Bilder entstanden. 
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mehr als 40 Zeichen eingegeben, rollt der Bildschirminhalt 
automatisch nach links. 

Drückt man die HELP-Taste, gelangt man in den Befehlsmo¬ 
dus. Dabei erscheint im oberen Teil des Bildschirms ein Menü 
mit sämtlichen Befehlen des Programms, die sich allerdings 
auf zehn sinnvolle Kommandos beschränken. Man kann Text 
suchen, ersetzen, einfügen, einen automatischen Zeilenum¬ 
bruch ein- und ausschalten, Text speichern und laden, 
drucken und eine Blockkopier-Funktion aktivieren. Zum 
Glück ist das Programm nicht in Basic, sondern in reiner 
Maschinensprache geschrieben. Alle vorhandenen Kom¬ 
mandos werden also ohne lange Wartezeiten ausgeführt. 

Es fehlen leider wirklich wichtige Kommandos, wie zum 
Beispiel die Möglichkeit, seinen Drucker an das Programm 
anzupassen oder die Wahl verschiedener Schriftarten (zum 
Beispiel Unterstreichungen oder Fettdruck). Weiterhin ver¬ 
fügt das Programm über keine deutschen Umlaute, die nor¬ 
malerweise Standard bei guten Textverarbeitungen sind. 
Auch kann man den rechten Rand nicht frei definieren und 
den Text zum Beispiel nicht im optisch anspruchsvollen 
Blocksatz formatieren, wie dieser Testbericht geschrieben 
ist. 

Sicherlich darf man dieses Programm nicht mit wirklich pro¬ 
fessionellen Textverarbeitungssystemen vergleichen, aber 
etwas mehr Komfort und zusätzliche Funktionen wären wün¬ 
schenswert gewesen. Auch die Anleitung kann mit ganzen 
90 Zeilen nicht befriedigen. Es fehlen Beispiele und weiter¬ 
führende Informationen. Der Preis von 29,90 Mark ist in 
Anbetracht der gebotenen Leistungen nicht gerechtfertigt. 


Micro Datei 


Nach den herben Enttäuschungen, die wir bis jetzt beim 
Testen von C16-Anwendungs-Software erlebt haben, sind 
wir um so mehr auf das Programm »Micro Datei« von Kingsoft 
gespannt. Uns lag die Kassettenversion vor, die gleich zu 
Beginn mit einer Überraschung aufwartet: Das Programm ist 
mit einem Schnellader versehen, der die Ladezeit auf lobens¬ 
werte 50 Sekunden reduziert. 

Als erstes muß man sich entscheiden, ob man mit Diskette 
oder Kassette arbeiten will. Danach möchte das Programm 
den Namen einer erstellten Dateimaske wissen, die es laden 
soll. Eine Dateimaske ist der Bildschirmaufbau, in den Sie 


später Daten eingeben werden. Ein Blick in die Anleitung sagt 
uns, daß zum Erstellen einer Eingabemaske ein anderes Pro¬ 
gramm benötigt wird. Es steht auf der Kassette direkt hinter 
dem Dateiprogramm. Dies ist zwar etwas umständlich, man 
hat aber durch diese Aufteilung im Hauptprogramm mehr 
Speicherplatz für Daten zur Verfügung. Eine komplette Datei¬ 
maske kann maximal 26 Eingabefelder enthalten. Beim C16 
ohne Speichererweiterung können maximal 83 Datensätze 
verwaltet werden. Beim C16 mit 64-KByte-Erweiterung oder 
beim Plus/4 erhöht sich diese Zahl auf 865. Diese Angaben 
gelten für die einfache Adreßverwaltung, die als Beispiel mit¬ 
geliefert wird. Die maximale Anzahl an Datensätzen ist davon 
abhängig, wie viele Informationen man in einer einzigen Bild¬ 
schirmmaske unterbringen möchte. 

Die Eingabemaske ist frei definierbar, eine durchaus nicht 
selbstverständliche Einrichtung. Sie können den Bildschirm¬ 
aufbau also so gestalten, wie es für Sie je nach Anwendung 
am sinnvollsten ist (zum Beispiel Adressenverzeichnis, Tele¬ 
fonbuch oder Schallplattenverwaltung). Die mitgelieferte 
Anleitung ist dabei eine wertvolle Hilfe. Anhand eines kleinen 
Beispieles hat man die Tastenfunktionen schnell begriffen, 
kann sich seine persönliche Datei aufbauen und diese dann 
auf Diskette oder Kassette speichern. Zum Arbeiten mit der 
Eingabemaske benötigen wir dann wieder das Hauptpro¬ 
gramm. 

Zum Eingeben und Bearbeiten stehen Ihnen umfangreiche 
Möglichkeiten zur Verfügung. Die Eingabe ist sehr flexibel 
gehalten, so daß Sie zum Beispiel mit den Cursortasten durch 
die einzelnen Felder fahren können, um noch Korrekturen 
auszuführen. Die eingegebenen Daten können nach jedem 
beliebigen Feld sortiert werden. Diese Listen können Sie aus- 
drucken, wobei Sie die Form des Ausdrucks in weiten Gren¬ 
zen selbst bestimmen. Sogar Adreßetiketten lassen sich 
bedrucm: . Sehr sinnvoll ist auch die Möglichkeit, nicht alle 
Felder eines Datensatzes, sondern nur einzelne auszu¬ 
drucken. Wenn Sie zum Beispiel eine Adressenkartei aufge¬ 
baut haben, genügt es ein paar zusätzliche Tasten zu drücken 
und schon haben Sie eine Telefonliste mit Name und Telefon¬ 
nummer jeder gespeicherten Person. Die dabei unwichtige 
Anschrift verschwendet kein Papier. 

Natürlich ist eine Suchfunktion vorhanden, um einen belie¬ 
bigen Datensatz schnell aufzufinden. Dabei ist das Feld, nach 
dem gesucht werden soll, frei wählbar. Einerseits lassen sich 
also alle Müller oder alle Teilnehmer in München selektieren. 
Über einen zusätzlichen Menüpunkt ist selbst das Drucken 
einer solchen Liste mit vorher aussortierten Daten aus der 
Gesamtdatei kein Problem. 



Die Textverarbeitung »Text C16« ist äußerst spartanisch mit Die überragende Eigenschaft von »Micro Datei« Ist die freie 
Funktionen ausgestattet. Wählbarkeit der Eingabemaske. 
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Ein Nachteil des Programms soll an dieser Stelle nicht ver¬ 
schwiegen werden: Alle eingegebenen Daten werden in 
sequentieller Dateiform auf Diskette oder Kassette gespei¬ 
chert. Bei umfangreichen Dateien ist daher mit beträchtlichen 
Wartezeiten beim Laden und Speichern zu rechnen. 

Alles in allem ist Micro Datei ein sehr flexibles Programm, 
das für den relativ niedrigen Preis von 29 Mark viel zu bieten 
hat und daher ohne Bedenken weiterempfohlen werden 
kann. 


CSJ Turbo Tape 


Jeder Datasetten-Besitzer kann ein Lied davon singen: Das 
Laden und Speichern von längeren Programmen ist wirklich 
nervtötend. 

Von CSJ gibt es daher ein Turbotape-Programm, das die 
Datasette um den Faktor 12 beschleunigt. Dieses Turbotape 
arbeitet im Verborgenen, so daß sich der Anwender nicht wei¬ 
ter darum kümmern muß. Nach dem Initialisieren werden 
automatisch alle SAVE- und LOAD-Befehle schneller ausge¬ 
führt. 

Über zwei SYS-Befehle schaltet man die schnellere Lade¬ 
routine aus und wieder ein. Als Besonderheit wird beim 
Laden die Start- und Endadresse des gefundenen Pro¬ 
gramms angezeigt. Besonders für Maschinensprache- 
Programmierer ist dies eine nützliche Einrichtung. 

Auf derselben Kassette befindet sich auch ein sogenann¬ 
tes »Azimuth-Programm« zum Einstellen des Tonkopfs einer 
Datasette. Wer oft Kassetten mit anderen C16-Besitzern 
tauscht, kennt das Problem der falsch eingestellten Ton¬ 
köpfe. Die Programme lassen sich dann meist gar nicht mehr 
laden. 

Direkt hinter dem Azimuth-Programm ist eine spezielle Ton¬ 
spur auf das Band aufgetragen, anhand derer der Tonkopf 
dann eingestellt werden kann. Eines haben die Programmie¬ 
rer jedoch vergessen: Hat man schon längere Zeit Pro¬ 
gramme mit falsch eingestelltem Tonkopf gespeichert, lassen 
sich diese nach der Neueinstellung nicht mehr laden. Der 
Tonkopf ist dann zwar »optimal« eingestellt, aber nicht mehr 
für die alten Kassetten. Trotzdem ist Azimuth eine ganz 
brauchbare Hilfe vor allem für gekaufte Programmkassetten. 
Und ein Turbotape darf sowieso in keiner Programmsamm¬ 
lung fehlen. Somit kann der Preis von 29,90 Mark für das 
Paket noch als angemessen betrachtet werden. (tr) 

Paintbox, Micro Datei: Kinosolt, Schnackobusch 4. 6106 Roentgen 

lext C16, CSJ Turbo Tape: CSJ-Sott, An dor Tlefonnede 27, 3000 Hannovor I 
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Basic-Compiler für den Plus/4 


Was bringt der Austrospeed +4, der erste Basic- 
Compiler für den Plus/4? Ein erster Test legt Vor- 
und Nachteile offen und erklärt Ihnen gleichzeitig 
die wichtigsten Grundbegriffe. 

ie werden sich sicherlich schon des öfteren über die 
bescheidene Geschwindigkeit von Basic geärgert 
haben, insbesondere wenn es sich um zeitkritische Pro¬ 
gramme handelte. Dies liegt aber daran, daß Basic eine 
Interpreter-Sprache ist. Dabei analysiert ein Interpreter bei 
jedem Programmlauf Basic-Zeile für Basic-Zeile und führt 
danach die jeweiligen Anweisungen aus. Trifft er auf einen 
Befehl, so überprüft er ihn auf die Richtigkeit der Syntax, 
übersetzt ihn anschließend und führt dann den entschlüssel¬ 
ten Befehl aus. So muß er beispielsweise bei jedem Varia¬ 
blenzugriff erst im Speicher nach dem Variablennamen 
suchen bevor er den Wert verarbeiten kann. Auch bei Sprun¬ 
ganweisungen mit GOTO oder GOSUB muß jedesmal nach 
der angegebenen Zeilennummer gesucht werden. Gerade 
dieses ständige Suchen nach Variablen und Zeilennummern 
und besonders auch die Syntaxprüfung sind diejenigen Fak¬ 
toren, die ein Basic-Programm im Gegensatz zu einem com- 
pilierten Programm langsam werden lassen. 

Ein Compiler geht hier einen anderen Weg. Er übersetzt 
(compiliert) das Basic-Programm in einen besonderen Code, 
auch P-Code genannt, der kürzer und, da sehr maschinen¬ 
nah, auch schneller abzuarbeiten ist. Mit einem speziellen 
Maschinenprogramm (Run-Time-Modul) wird aus dem P- 
Code schließlich ein ablauffähiges Programm. Dabei fallen 
die Nachteile des Interpreters zum größten Teil weg. So wer¬ 
den sämtliche Sprünge in direkte Adressen umgewandelt, 
und auch Variablen haben einen festen Platz im Speicher, auf 
den ohne weitere Umwege zugegriffen werden kann. 
Schließlich entfällt die so zeitraubende Syntaxüberprüfung 
während des Programmablaufes, da diese nur ein einziges 
Mal beim Übersetzen geschieht. 

So mancher Plus/4-Besitzer wird darum auch recht neid¬ 
voll zum C64-Anwender hinüberschielen, der bei Basic- 
Compilern eine reiche Auswahl hat. Doch sie sollen getröstet 
werden, denn seit kurzer Zeit gibt es auch für den Plus/4 
einen leistungsfähigen Basic-Compiler, der den vollen 
Sprachumfang des Basic 3.5 versteht. Es handelt sich hier¬ 
bei um die Plus/4-Version des unter C64-Anwendern 
bekannten Compilers Austrocomp. Er nennt sicli Austro¬ 
speed + 4. 

Man darf beim Kauf von Austrospeed +4 jedoch nicht ver¬ 
wundert sein, wenn einem der Verkäufer die Packung des 
Austrocomp 64 in die Hände drückt, auf dem lediglich ein 
kleiner Aufkleber darauf hinweist, daß sich Austrospeed +4 
darin befindet. Auch die mitgelieferte Bedienungsanleitung 
ist mit der von Austrocomp 64 identisch, da beide Compiler 
auf die gleiche Weise arbeiten. Etwaige Abweichungen und 
Eigenheiten des Austrospeed +4 sind in einem beigelegten 
Zettel vermerkt. Daneben beinhaltet die Packung noch die 
Programmdiskette und ein seltsames schwarzes Kästchen. 
Dieses Plastikkästchen wird auch Dongle genannt und muß 
vor Verwendung des Compilers in den User-Port gesteckt 
werden. Der Dongle ist ein Kopierschutz, ohne ihn läuft das 
Programm nicht. 

Die Bedienung von Austrospeed +4 ist sehr einfach. Dazu 
laden Sie das Programm der mitgelieferten Diskette und star¬ 
ten dies mit RUN. Sofort erscheint ein einfaches Menü, in 
dem sechs verschiedene Punkte zur Wahl stehen. So muß 
man in bezug auf den Basic-Befehl RESUME einiges beach¬ 


ten. Wie Sie wissen, ist RESUME die Rücksprunganweisung 
einermöglichen Fehlerroutine beim Plus/4. Austrospeed +4 
bietet in dieser Hinsicht zwei Übersetzungsmodi. Im ersten 
Modus darf im Basic-Programm der Befehl RESUME nur in 
Verbindung mit einer Zeilennummer Vorkommen. Sämtliche 
Rücksprungadressen werden dabei vom Arbeits-Stack 
gelöscht. Der zweite Modus erlaubt dagegen auch RESUME 
ohne Zeilennummer (fehlerhaften Befehl wiederholen) und 
RESUME NEXT (nächsten Befehl ausführen), was sich aller¬ 
dings in der Ablaufgeschwindigkeit des Compilats (übersetz¬ 
tes Programm) auswirkt. So kann es Vorkommen, daß das 
compilierte Programm zirka 20 Prozent länger und etwa 10 
Prozent langsamer wird als ein im ersten Modus compiliertes. 

Unter Berücksichtigung dieser beiden Modi kann man über 
die sechs Auswahlpunkte angeben, mit welcher Floppy- 
Konfiguration gearbeitet werden soll. Ob Sie ein Doppellauf¬ 
werk, zwei Einzellaufwerke oder nur eine Floppy 1551 besit¬ 
zen, Austrospeed +4 unterstützt alle drei Möglichkeiten. Bei 
nur einem Laufwerk legt der Compiler das fertig compilierte 
Programm wieder auf der gleichen Diskette ab. Bei einem 
Doppellaufwerk oder zwei Einzellaufwerken kann jedoch von 
einem Laufwerk auf das andere compiliert werden. Beson¬ 
ders interessant ist die Tatsache, daß damit ganze Programm¬ 
pakete übersetzbar sind. Ein solches Paket kann aus einem 
Menü-Programm und mehreren unabhängigen Teilprogram¬ 
men bestehen, die vom Menüprogramm nachgeladen wer¬ 
den. Dabei werden alle Programme compiliert, jedoch nur das 
Menüprogramm mit dem nötigen Run-Time-Modul ausgestat¬ 
tet. Von • en Teilprogrammen wird lediglich der P-Code 
erzeugt, der ja wesentlich kürzer ist und somit schneller 
nachgeladen werden kann. Sie sind aber wegen des fehlen¬ 
den Run-Time-Moduls nur in Verbindung mit dem Menüpro¬ 
gramm lauffähig. 

Ebenso schön ist auch die Möglichkeit, mit Overlay-Technik 
zu arbeiten, wie man sie eigentlich eher bei Pascal gewöhnt 
ist. Hierbei übernehmen die nachgeladenen Teilprogramme 
sämtliche Variablen aus dem vorhergehenden Programm. 
Dabei wird zuerst der Speicherplatz für das längste Pro¬ 
gramm ermittelt und reserviert, und danach der Bereich für 
die Variablen festgelegt. Die Teilprogramme werden nun in 
den reservierten Speicherplatz geladen, wobei die Variablen¬ 
felder jedoch erhalten bleiben und weiter genutzt werden 
können. Damit lassen sich riesige Programme erstellen. 



V2 3.5 speed +4 


Bild 1.1000 Durchläufe einer FOR-NEXT-Schleife 
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Der Haken ist aber, daß der Anwender mit nur einer Floppy 
1551 diese fantastischen Techniken nicht realisieren kann, 
da sie nur mit einem Doppellaufwerk oder zwei Diskettensta¬ 
tionen funktionieren. Da bleibt für den Normalanwender nur 
noch eine Compilierungsart übrig, die wir im folgenden anse- 
hen möchten. 

Wählen wir dafür den Modus für das Einzellaufwerk 1551. 
Nachdem man die Diskette mit dem zu compilierenden Basic- 
Programm in das Laufwerk geschoben hat, muß nur noch der 
Name des Programms angegeben werden. Die eigentliche 
Arbeit übernimmt nun der Compiler in zwei Durchgängen 
(englisch Passes). Im ersten Durchlauf übersetzt er das 
Basic-Programm in den schon erwähnten P-Code und über¬ 
prüft dabei das Programm auf syntaktische Fehler. Sollte ein 
Fehler auftreten, wird eine entsprechende Fehlermeldung 
inklusive Zeilennummer auf dem Bildschirm ausgegeben. Die 
Übersetzung geht jedoch bis zum Ende des zweiten Durch¬ 
laufs weiter, um weitere Fehler, die eventuell versteckt sind, 
aufzuzeigen. Das dabei entstandene Compilat ist wegen sei¬ 
ner Fehler natürlich nicht lauffähig. Während des Überset¬ 
zens müssen dabei die fehlerhaften Zeilennummern mitge¬ 
schrieben und im Original ausgebessert werden. Solange nur 
wenige Fehler auftreten, ist es noch recht einfach, diese zu 
notieren und im Basic-Programm auszumerzen. Überschrei¬ 
tet die Fehleranzahl aber eine gewisse Grenze, kann das Auf¬ 
schreiben der Fehler und das anschließende Suchen zur Tor¬ 
tur werden. Es empfiehlt sich daher, sein Basic-Programm 
gründlich auszutesten, bevor man es dem Compiler überläßt. 

Im ersten Durchlauf werden sämtliche Zeilennummern, auf 
die eine Sprunganweisung zeigt, markiert, übersetzt und 
direkt mit den Sprungbefehlen gekoppelt. Das gleiche 
geschieht auch mit den Variablen. 

Der zweite Durchlauf fügt nun den P-Code, das dazugehö¬ 
rige Pui-Time-Modul, die Variablenlisten und gegebenenfalls 


Bild 3. Die Grundrechenarten und die Klammerrechnung Bild 4. GOSUB und RETURN werden wesentlich schneller 




Bild 2.1000 IF-THEN-Abfragen. Der Geschwindigkeits- 
Unterschied ist enorm. Das Compilat ist fast 9mal schneller. 
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auch Datenlisten zu einem perfekt compilierten Programm 
zusammen, das schließlich auf Diskette unter dem Namen 
»C/(Name des Originals)« abgelegt wird. Während des Vor¬ 
gangs können Sie stets am Bildschirm ablesen, welches Pro¬ 
gramm compiliert wird und in welchem Pass und welcher 
Basic-Zeile der Compiler gerade ist. Zum Schluß erhält der 
Anwender noch die Compilationsdauer und die Information, 
wieviele Fehler bei der Übersetzung aufgetreten sind, mit¬ 
geteilt. 

Ging die Übersetzung ohne Zwischenfälle vonstatten, 
kann das auf Diskette gespeicherte Compilat jederzeit unab¬ 
hängig vom Compiler geladen und gestartet werden. Sie wer¬ 
den dabei über die Geschwindigkeit erstaunt sein. Doch kann 
es auch beim Programmablauf Schwierigkeiten geben. Eine 
bestimmte Art von Programmfehlern konnte der Compiler 
selbstverständlich nicht erkennen, da sie erst auftreten, 
wenn das Programm in Aktion ist. Man nennt diese auch Lauf¬ 
zeitfehler (Run-Time-Errors), von denen Sie einige sicherlich 
kennen. Da gibt es zum Beispiel den berüchtigten »ILLEGAL 
QUANTITY ERROR«, der erscheint, wenn bestimmte Basic- 
Funktionen mit unerlaubten Werten gefüttert werden, wie 
zum Beispiel 
POKE 1456,A 

wenn A dabei den Wert 256 überschreitet. Sie werden auch 
schon einmal mit dem »DIVISION BY ZERO ERROR« zu tun 
gehabt haben, mit dem sich der Computer beschwert, wenn 
Sie durch Null dividieren wollen. Gerade solch logische Feh¬ 
ler können im syntaktisch perfekten Compilat auftreten, was 
auch mit einer entsprechenden Fehlermeldung quittiert wird. 
Doch hat ein compiliertes Programm gar keine Zeilennum¬ 
mern mehr, in denen der Fehler auftreten könnte. Statt des¬ 
sen wird mit der Meldung ein aktueller Programmzähler ange¬ 



Bild 5. Das Füllen eines auf 1000 Felder dimensionierten 
A.rrays: Immerhin dreimal schneller. 


geben, mit dessen Hilfe man Rückschlüsse auf den fehlerhaf¬ 
ten Ort im Original ziehen kann. Zusätzlich zum Compilat legt 
Austrospeed +4 nämlich ein weitereres File ab, das den 
Beginn aller Zeilennummern in bezug auf den Programmzäh¬ 
ler beinhaltet. Hat man zum Beispiel einen 
DIVISION BY ZERO ERROR IN 6579 
so lädt man einfach das Zeilennummernfile zu diesem Pro¬ 
gramm, das unter dem Namen »Z/(Name des Programms)« 
gespeichert ist. Tippt man nun etwa LIST 6000 bis 6579, 
werden sämtliche Zeilennummern gelistet, die innerhalb der 
Programmzählerwerte 6000 und 6579 Vorkommen. Die 
zuletzt ausgegebene Zeile ist dann die womöglich fehlerhafte 
Basic-Zeile. Auf diese Weise können sämtliche Laufzeitfehler 
im Basic-Original lokalisiert werden. 

Besonderheiten: 

Um die Geschwindigkeit der Compilate noch zu erhöhen, 
baut Austrospeed +4 eigene schnelle Integer-Routinen ein, 
wenn mit Integerzahlen gerechnet wird. Außerdem erkennt 
der Compiler automatisch, ob eine reelle Zahl keine Nach¬ 
kommastellen besitzt, und wandelt sie automatisch in eine 
Integerzahl um, worauf dann die schnelle Integer-Arithmetik 
angewandt werden kann. 

Eine weitere Besonderheit ist, daß mit Austrospeed +4 
compilierte Programme eine höhere Verschachtelungstiefe 



Bild 6. Da die Rechenroutinen des Interpreters benutzt wer¬ 
den, ist hier nicht viel gewonnen 
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Bild 7. READ und RESTORE, fast 20mal schneller: eine 
enorme Beschleunigung dieser Befehle. 



Bild 8. Die Durchschnittszeit für das Sortieren von 100 
Zufallselementen mit Bubble-Sort 


erreichen dürfen, als dies vom Interpreter aus erlaubt ist. 
Aufgrund der begrenzten Stack-Größe des Basic-Interpre- 
ters können GOSUB-Unterprogramme oder FOR-NEXT- 
Schleifen nur bis zu einer bestimmten Ebene geschachtelt 
werden. Austrospeed aber benötigt für die einzelnen 
Rücksprungadressen weniger Stack-Speicher, was zur 
Folge hat, daß die Schachtelungstiefe weit größer sein kann. 
Auf diese Weise können rekursive Programme laufen, wie sie 
es mit dem Interpreter sicherlich nicht würden, da ständig ein 
Stack-Überlauf droht. 

Haben Sie ein Basic-Programm geschrieben, das ein 
Maschinenprogramm verwendet, welches hinter dem Haupt¬ 
programm steht, kann auch dieses ohne Bedenken durch 
den Compiler geschickt werden. Austrospeed +4 über¬ 
nimmt nämlich noch sämtliche nachstehenden Bytes nach 
Programmende unverändert, und setzt es an das Ende des 
Compilats. Da sich die Programmlänge durch das Compilie- 
ren ändert, muß dabei aber die Einsprungadresse des 
Maschinenprogramms angeglichen werden. 

Schade ist aber, daß das wahlweise An- und Abschalten 
der STOP-Taste bei Austrospeed +4 nicht mehr funktioniert. 
So kann ein mit Austrospeed +4 compiliertes Programm 
nicht mehr mit der Break-Taste gestoppt werden, wie man es 
bei Austrocomp 64 nach Belieben einstellen konnte. Die 
Austrospeed-Autoren begründen dies damit, daß am Plus/4 
ja nun ein Reset-Schalter angebracht sei, mit dem das Pro¬ 
gramm jederzeit gestoppt werden könnte. Wem diese nicht 
gerade professionelle Art des Programmabbruchs nicht 
gefällt, der sollte also nie vergessen, eine Routine in sein Pro¬ 
gramm einzubauen, welche einen eleganteren Programmab¬ 
bruch ermöglicht. 

Auch Befehle aus Basic-Erweiterungen, die vom Compiler 
nicht verstanden werden, sind möglich. Durch eine spezielle 
Kenr,zc ; chnung eines solchen Befehls wird die Ausführung 
an den Interpreter übergeben. Das ist dann zwar langsamer, 
aber weder Compiler noch Compilat stürzen dann bei einem 
solchen Befehl ab. 

Geschwindigkeitstest 


Die Benchmark-Tests führten wir wieder mit dem Testpro¬ 
gramm aus Sonderheft 12/86, Seite 58 durch. Dazu löschten 
wirZeile 770, die beim Plus/4 in der dort abgedruckten Form 
nicht lauffähig ist. 

Die Ergebnisse der Benchmark-Tests entnehmen Sie bitte 
der Tabelle und den Bildern 1 bis 8. Die eingebauten Fehler 
erkannte der Austrospeed +4, ohne die Compilierung zu 
unterbrechen. Die Anzeige der Fehler wird auf einem ange¬ 
schlossenen Drucker protokolliert. 

Während des Tests entdeckten wir zwei nicht im Handbuch 
aufgeführte Fehlerquellen. Der erste war der LIST-Befehle 
der nicht übersetzt und als »unerlaubter Befehl« reklamiert 
wurde. Basic 3.5 gestattet jedoch LIST-Befehle im Pro¬ 
gramm. Vermutlich ist dies ein Überbleibsel aus der Version 
für den C64. Ganz anders dagegen die zweite Unstimmig¬ 
keit. Basic 3.5 erlaubt das Weglassen des ersten Parameters 
beim CHAR-Befehl. Der Compiler reagierte darauf mit einem 
Syntax-Error. Allerdings läßt sich dies durch eine saubere 
Programmierung vermeiden, so daß daraus keine Nachteile 
entstehen. 

Daß Austrospeed +4 ein sehr leistungsfähiger Basic- 
Compiler ist und seinem Vorgänger Austrocomp in nichts 
nachsteht, liegt auf der Hand. Noch deutlicher wird dies, 
wenn man erfährt, daß der Compiler ursprünglich in Basic 
geschrieben wurde und sich dann selbst compiliert hat. Dies 
ist ein Prinzip, das bei Basic-Compilern häufig angewandt 
wird. Die Tatsache, daß sich ein Programm selbst modifiziert, 
ist immer wieder faszinierend. (Michael Thomas/og) 
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Alles über den C16 



Das Buch hält wirklich, was 
der Titel verspricht. Es bietet 
sowohl für Anfänger als auch für 
fortgeschrittene Programmierer 
nützliche Informationen über 
ihren Commodore-Computer. 

Zu Beginn geht der Autor kurz 
auf den allgemeinen Aufbau 
eines Computers und die ver¬ 
wendeten Zahlensysteme ein. 
Der daran anschließende Basic- 
Kurs erstreckt sich über das 
gesamte Buch. In jedem Kapitel 
werden neue Basic-Befehle auf¬ 
gezeigt und in anschaulichen 
Programmbeispielen erklärt. 
Die Kapitel »Rechnen mit dem 
Computer«, »Logische Verknüp¬ 
fungen« und »Vergleichsbe¬ 
fehle« bilden den Anfang des 
Basic-Kurses. Die Basic-Varia- 
blen und deren Dimensionierung 
werden im Kapitel »Variablen« 
kurz erklärt. Der folgende 
Abschnitt widmet sich voll und 
ganz dem Basic-Kurs. Der Autor 
erläutert jede Basic-Anweisung 
anhand eines Beispiels oder 
eines ganzen Beispielpro¬ 
gramms. Mit der Grafik und 
Farbprogrammierung beschäf¬ 
tigt sich der Autor im Kapitel 
»Die hochauflösende Grafik des 
C16«. Für fortgeschrittene Pro¬ 
grammierer bieten die Ab¬ 
schnitte »Disketten-Program- 
mierung«, »Direkter Speicher¬ 
zugriff« und »Fehlerbehand¬ 
lung« nützliche Tips und Anre¬ 
gungen. Das letzte Kapitel 
»Maschinensprache mit dem 
C16« gibt einen kleinen Einblick 
in die Welt der Maschinenspra¬ 
che und deren Programmierung 
mit Hilfe des TEDMON. Im 
umfangreichen Anhang des 
Buches findet der Leser nütz¬ 
liche Tabellen, Adressen, Regi¬ 
ster sowie alle Anschlußbele¬ 
gungen des C16/116. 

(Christian Q. Spitzner/bj) 

Wilhelm Besenthal und Jens Muus, Alles über 
den C18. Mark! & Technik Verlag AG, 292 Sei¬ 
ten, ISBN: 3-89090-385-1. Preis: 39 Mark 


Commodore 16 mit 116 - 
Der Einsteiger-Computer 
mH Aufsteigen|ualHäten 

Dieses Buch war eines der 
ersten, die zum C16 veröffent¬ 
licht wurden, und ist vor allem 
für Einsteiger gedacht. 

Die ersten zwei Kapitel enthal¬ 
ten nur allgemeine Informatio¬ 
nen über Hard- und Software 
eines Computers. Dieser Ab¬ 
schnitt ist sehr ausführlich ge¬ 
halten, da auch Randgebiete 
wie etwa rechtliche Fragen 
beim Raubkopieren geklärt wer¬ 
den. Wer noch nie mit einem 
Computersystem zu tun hatte, 
wird sich über die ausführliche 
Einleitung freuen. Auf gleiche 
Weise erlernt man dann das Pro¬ 
grammieren: Zuerst erfährt der 
Leser die theoretischen Grund¬ 
lagen, dann wird er mit den 
Befehlen des Basic 3.5 vertraut 
gemacht. Die Befehlserklärun¬ 
gen sind gut gelungen, da sie 
sowohl dem Autodidakten als 
auch demjenigen, der öfters 
Befehlsbeschreibungen nach¬ 
schlagen will, gleichermaßen 
dienen und mit guten Beispielen 
unterlegt sind. 


Hans Riedl Franz Ouia' ? 

COMMODORE 



Sogar eine Vergleichsliste 
mit anderen Basic-Dialekten 
(»Simons Basic«, »Supererwei¬ 
terung«) findet man, die einem 
das Umschreiben fertiger Pro¬ 
gramme ermöglicht. 

Das Thema »Datenverarbei¬ 
tung« vernachlässigen die Auto¬ 
ren leider sehr stark; auch auf 
die Speichererweiterung und 
den Plus/4 gehen sie in keiner 
Weise ein. 

Für den absoluten Neuein¬ 
steiger ist dieses Buch wirklich 
empfehlenswert. Wer aber auch 
nur etwas Erfahrung besitzt, 
wird zusätzliche Informationen 
gegenüber dem Handbuch 
höchstens im Bereich der Grafik 
finden. (Florian Müller/bj) 

Hans Riedl, Franz Ouinke, Commodore 16 mil 
116 - Der Einstelgercomputer mit Aufsteiger- 
qualltaten. Klehl Verlag 1985, 164 Seiten. 
ISBN: 3-470-80481-8. Preis: 29,80 Mark 


Alles über den Plus/4 



Das neueste Werk aus der 
Commodore-Sachbuchreihe 
»Alles über den Plus/4« erinnert 
sehr stark an das gleichnamige 
Buch über den C16. Kein Wun¬ 
der: es ist von den gleichen 
Autoren geschrieben worden. 
Auf 373 Seiten wird dabei dem 
Leser auf verständliche Weise 
alles Wissenswerte über den 
Plus/4 mitgeteilt. Gegliedert ist 
dieses Werk in zwei große 
Hauptkapitel. Teil eins enthält 
wie das Buch »Alles über den 
C16« die Sachgebiete 

- ausführlicher Basic-Kurs 

- strukturiertes Programmieren 

- Dateive"“ altung 

- Grafikprogrammierung sowie 

- nützliche Tips und Tricks. 
Zusätzlich enthält es eine um¬ 
fangreichere Sammlung an Bei¬ 
spielprogrammen. Der zweite 
Teil besteht aus einem sehr 
guten und ausführlichen Ma¬ 
schinensprachekurs. Hier wird 
der Anfänger in die Maschinen¬ 
sprache und Assemblerpro¬ 
grammierung des Plus/4 einge¬ 
führt. Die Autoren gehen sehr 
genau auf Interrupt-Program¬ 
mierung und Bankswitching ein. 
Weiterhin werden einige wich¬ 
tige Register des TED-Baustei- 
nes erklärt. Hobbybastler wer¬ 
den sich über Informationen 
zum Userport und dessen Pro¬ 
grammierung freuen. Als Bau¬ 
anleitungen stehen zur Aus¬ 
wahl: 

- Alarmanlage am Userport 

- Centronics-Schnittstelle 

- EPROM-Platine am 
Expansionsport. 

Im umfangreichen Anhang fin¬ 
det der Leser nützliche Tabel¬ 
len, Adressen und Register, 
ein Computerlexikon sowie alle 
Anschlußbelegungen des Plus/4, 
insgesamt viele Informationen, 
die nicht im Handbuch stehen. 
(Christian Q. Spitzner/bj) 

Wilhelm Besenthal/Jens Muus. Alles Ober den 
Plus/4, Markt& Technik Verlag AG. 373 Selten, 
ISBN 3-89090-410-6, Preis 39 Mark 


Busic-Wegweiser für 
den C116, 16 r Plus/4 

Das vorliegende Buch ist viel¬ 
leicht das beste Buch zu Basic 
3.5. Auf 305 Seiten erfährt man 
zunächst Allgemeines über 
Computer. Wenn man etwas 
praktisches Wissen über seinen 
Computer gesammelt hat, findet 
man hier beim Nachschlagen 
etliche Informationen, die man 
anfangs mangels theoretischer 
Kenntnisse nicht verstehen 
konnte. Insofern steigt der Nutz¬ 
wert dieses Buches mit den 
Kenntnissen des Anwenders. 

Der praktische Einstieg im 
Buch wird im zweiten Haupt¬ 
kapitel bewältigt, das wegen 
seiner Verständlichkeit, der 
zahlreichen Beispiele sowie der 
großen Übersichtlichkeit auf¬ 
fällt. 



Das dritte und letzte Haupt¬ 
kapitel widmet sich dann zahlrei¬ 
chen Anwendungen des in 
Kapitel zwei oder im Handbuch 
Erlernten. Es zeigt dem Leser, 
wie man bestimmte Programme 
schreibt. Die Themenvielfalt 
(Programmstrukturen, Ein-/Aus- 
gabe im Detail, System-Interna, 
Arrays, Suchen-Sortieren- 
Mischen, Programmerstellung 
mit Toolkit-Befehlen, Dateiver¬ 
arbeitung, Grafik, Musik) ist 
wegen der klaren Einteilung 
nicht erdrückend, bietet aber 
wohl jedem Leser etwas. Das 
Kapitel über »Maschinennahe 
Programmierung« fällt, wie bei 
den meisten Basic-Büchern, 
nicht sehr umfangreich aus. 

Abschließend kann man 
sagen, daß dieses Buch durch¬ 
weg zu empfehlen ist. Der Preis 
des Buches ist mehr als ange¬ 
messen, bei der Programmdis¬ 
kette jedoch zu hoch. 

(Florian Müller/bj) 

Ekkehard Kaler. Commodore 116, 16, Plus/4 
Basic-Wegwelser, Vleweg Verlag, 305 Selten, 
45 Mark, ISBN: 3-528 04337-7, Programm¬ 
diskette (keine Kassette erhältlich!) 48 Mark. 
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C16 + 64 KByte, Plus/4 



Supergrafik 
der dritten Dimension 


Das hat es für den C16 noch nie gegeben: Drei¬ 
dimensionales maßstabsgetreues Konstruieren! 
Ein Grafikprogramm der Spitzenklasse für den 
C16 mit 64 KByte Erweiterung und den Pius/4. 

D esigner und Konstrukteure von geplanten Anlagen, For¬ 
men und Geräten benötigen ein besonderes räum¬ 
liches Vorstellungsvermögen und exakte grafische Dar¬ 
stellungen ihrer räumlichen Arbeitsobjekte. Perspektivische 
Ansichten können leider von Hand nur mit großem Zeitauf¬ 
wand in den Proportionen korrekt angefertigt werden. Dabei 
ist neben handwerklichem und künstlerischem Geschick 
auch eine gehörige Portion Erfahrung erforderlich. Es wird 
darüber hinaus eine erhebliche Menge elementarer Rech¬ 
nungsarbeit anfallen. Das Programm PED erleichtert dem 
Anwender diese Arbeiten erheblich und stellt gleichzeitig 
eine Einführung in computerunterstütztes Arbeiten dar. Die 
grundsätzlichen Konstruktionsschritte der Vektorrechnung 
sind vorhanden und strukturell so angeordnet, daß der 
Anwender seine Arbeitsweise dieser Struktur sehr leicht 
anpassen kann. Auf den Einsatz der projektiven Geometrie 
wurde verzichtet. 

Das Programm PED zielt ab auf weiterführende Schulen 
und Betriebe, für die sich kein großer und kostspieliger Auf¬ 
wand an Datenverarbeitung lohnt. Meistens unterbleibt in 
diesen Bereichen so mancher Versuch einer perspektivi¬ 
schen Darstellung geplanter Anlagen, weil der Zeitaufwand 
dafür zu groß ist. Außerdem wächst dieser Aufwand noch pro¬ 
portional mit jeder weiteren neuen Ansicht. So kommt es oft 
nach der Fertigung erster Modelle zu Überraschungen, weil 
Idee und Wirklichkeit auseinanderklaffen. Hier bringt ein gut 
strukturiertes Computermodell des Arbeitsobjektes eine 


große Zeitersparnis und erhöht gleichzeitig die Sicherheit vor 
ungewollten Formen. Zusätzlich sind Varianten des Objekts 
relativ leicht herzustellen. 

Da alle zeitraubenden Rechnungen und Zeichnungen vom 
Computer übernommen werden, bleibt viel Zeit zum selb¬ 
ständigen Üben. Das Ergebnis der eigenen Arbeit ist stets 
nach einigen Sekunden zu sehen und zu beurteilen. 

Die Zusammenarbeit mehrerer Anwender läßt sich eben¬ 
falls üben, da die erzeugten Datensätze ausgetauscht, ange¬ 
paßt, zerlegt, zusammengesetzt oder unter bestimmten 
Gesichtspunkten geordnet werden können. Arbeitsteilung 
und systematisches Handeln führen zu einer Verminderung 
des Gesamtaufwands und erhöhen die Freiheit des Gesamt¬ 
systems. 

Wegen der eingeschränkten Möglichkeiten der ausge¬ 
wählten Computer können mit vertretbarem Zeitaufwand nur 
einfache Drahtmodelle erzeugt werden. Als Strukturele¬ 
mente stehen für die grafischen Operationen nur Punkt und 
Linie oder Gruppen aus diesen Elementen zur Verfügung. Auf 
Flächen- und Volumenelemente wurde verzichtet. 

Weder das Hinterschneidungsproblem noch die direkte 
Darstellung gekrümmter Formen sind berücksichtigt. Hier 
muß vom Anwender nachträglich Hand angelegt werden, 
indem er unsichtbare Teile löscht und Rundungen mit dem 
Kurvenlineal oder von Hand nachzieht. 

Die Linien werden im Rahmen der Vektorrechnung durch 
zwei Ortsvektoren mit je drei Koordinaten beschrieben. 
Wenn eine Vielzahl von Linien ein bestimmtes Objekt 
beschreibt, ist es eine Vereinfachung, eine Tabelle aufzustel¬ 
len, in der die Punkte aufgeführt sind, und dazu eine zweite 
Tabelle, in der steht, welche zwei Punkte jeweils eine Linie bil¬ 
den. Sämtliche geometrischen Operationen sind dann vor¬ 
stellbar als Eingriffe in diese Tabellen. Wird zum Beispiel ein 
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Punkt in einer Grafik gelöscht, so werden im Hintergrund 
durch den Computer die Punktnummer und die drei Koordi¬ 
naten des Punktes aus der Punkttabelle ausgetragen. Außer¬ 
dem ist es zweckmäßig, gleich alle Linien mitzulöschen, die 
bisher zu dem gelöschten Punkt führten. Also wird die Linien¬ 
tabelle nach der gerade gelöschten Punktnummer abge¬ 
sucht und jede Linie aus der Linientabelle ausgetragen, wel¬ 
che die fragliche Punktnummer enthält. 

Grundsätzlich sind drei verschiedene Zugriffsmöglichkei¬ 
ten auf die beiden Grundtabellen vorgesehen. Zuerst kann 
man direkt am Bildschirm in die Zahlenkolonnen hineinsehen 
und dort Ein- oder Austragungen oder Änderungen vorneh¬ 
men. Dann kann man, wenn es sinnvoll ist, ganze Punktberei¬ 
che mit einem Befehl bearbeiten. Man löscht eine zusam¬ 
menhängende Punktmenge, indem man sagt, welches 
Punktnummernintervall gemeint ist. Solche Gruppenopera¬ 
tionen auf dem Computer sind der Einzeloperation weit über¬ 
legen und vermindern den Arbeitsaufwand erheblich. 

Die interessanteste Zugriffsart aber ist, über die Bild¬ 
schirmgrafik selbst die Operation zu definieren. Man fährt 
zum Beispiel alle Punkte, die zu löschen sind, mit einem 
Fadenkreuz an und löst dann den Löschvorgang aus. Diese 
Art der Punktauswahl wird allgemein mit dem Wort 
»anpicken« bezeichnet. Das Anpicken ist die eleganteste 
Methode, weil man ohne Kenntnis von Punktnummern etc. 
aufgrund des sichtbaren Bildes die Auswahl trifft. Alles 
andere erledigt der Computer dann in Sekundenschnelle. Bei 
der Punktauswahl ist man natürlich nicht an eine bestimmte 
Nummernstruktur der Form gebunden, obwohl man auf solch 
eine Struktur nie verzichten sollte. 

Bei der Auswahl von Punktniummern sollte der Anwender 
mit sehr viel Umsicht Vorgehen. Punkte, die geometrisch zu 
einem bestimmten Teilobjekt gehören, sollten aus Gründen 
der Übersichtlichkeit alle ähnliche Nummern bekommen. 
Empfehlenswert ist es, den Wertebereich von 0 bis 9999 für 
Punktnummern in Gruppen zu je 100 Punkten zu zerlegen. 
Kleinere Gruppengrößen (zum Beipiel 10, 20 oder 50) sind 
auch möglich. Innerhalb einer Gruppe numeriert man dann 
einfach durch oder schafft sich weitere Unterstrukturen. 

Für den allgemeinen Fall gibt es keine Regel, aber weder 
zu kleine noch zu große Gruppen sind sinnvoll, da sich jeweils 
die Bearbeitungsdauer erhöht. Zu kleine Gruppen sind 
außerdem unübersichtlich. Als Beispiel kann man bei einem 
Drahtmodell eines Hauses für jede Außenwand eine 100er- 
Gruppe reservieren, für jede Dachseite eine solche Gruppe 
und gegebenenfalls Extragruppen für Außenfenster, Außen¬ 
türen, Schornstein und Dachfenster, je nachdem, wieviele 
Varianten man konstruieren muß. Insgesamt können gleich¬ 
zeitig nur 240 Punkte und 360 Linien im Computer Platz fin¬ 
den. Darüber hinaus werden die Objekte auf dem Bildschirm 
ziemlich unübersichtlich, und wesentlich mehr gibt der Spei¬ 
cher des Computers nicht her, wenn die Verarbeitung nicht 
zu langsam werden soll. 

Der Inhalt von Datensätzen kann jederzeit in übersichtli¬ 
cher Form auf dem Bildschirm dargestellt und auf einem 
Drucker ausgegeben werden. Es lassen sich perspektivi¬ 
sche Bilder auf dem Drucker oder einem Plotter ausgeben. 

Für den Plotter werden Plot-Files erzeugt, welche von 
einem Zusatzprogramm verarbeitet werden. Von allen Bildern 
lassen sich auch die Bildkoordinaten der Bildpunkte ausge¬ 
ben, so daß von Hand in beliebigem Maßstab danach abge¬ 
zeichnet werden kann. Die Anschaffung eines Plotters ist 
zwar eine feine Sache, aber ein Plotter wie der Commodore 
8075 ist nicht gerade billig und außerdem benötigt man 
zusätzlich ein lEC-Bus Interface. Als Matrixdruckeristim Hin¬ 
blick auf den Preis der MPS 801 von Commodore für das Pro¬ 
gramm PED vorgesehen. Andere Matrixdrucker erfordern 
eine Anpassung der Hardcopy-Funktion oder ein Interface. 
Einige Beispiele sehen Sie in allen Bildern 1 bis 15. 



Eingabehinweise und Programmstart 

Neben dem Plus/4 oder C16 mit 64 KByte Erweiterung 
und einem Bildschirmgerät benötigt man für das Programm 
noch eine Datasette oder ein Diskettenlaufwerk. Zusätzlich 
können noch ein Matrixdrucker und weitere Laufwerke ange¬ 
schlossen werden. 

Da die Eingabe dieses recht langen Programmes nicht in 
einem Stück von unserem MSE bewältigt wird, haben wir die 
Eingabehinweise in den nebenstehenden Texteinschub 
gepackt. Bitte gehen Sie genau nach der Anleitung vor, nur 
dann kann PED richtig funktionieren. Natürlich ist PED auch 
auf der Diskette des Leserservice enthalten. 

Zunächst werden die Geräte in der vorgeschriebenen Rei¬ 
henfolge angeschlossen und danach eingeschaltet. Je nach 
Gerätetyp ?ibt man nun ein Ladekommando über die Tastatur 
des Computers ein. Bei der Floppy lautet es 
LOAD"PED", 8 
und bei der Datasette nur 
LOAD 

Der Befehl wird wie jeder Befehl durch einmaliges Drücken 
der < RETURN > -Taste abgeschickt. Daraufhin lädt der 
Computer noch einen Maschinenspracheteil sowie das 
Hauptprogramm PED. 

Die Programmeldung mit dem Autorenvermerk verschwin¬ 
det nach einigen Sekunden und PED meldet sich mit dem 
Hauptmenü in der Kopfzeile des Bildschirms. Das Programm 
ist nun bereit zur Eingabe von Befehlen über die Tastatur des 
Computers. 

Nach dem Start meldet sich PED mit dem Hauptmenü 
AUGEN FORME BEWEG DATEN KOPIE 
in der Kopfzeile des Bildschirms. Einer der Menübegriffe ist 
markiert und damit anwählbar. Die Anwahl erfolgt durch ein¬ 
maliges Drücken der < RETURN >-Taste. 

Mit der Cursortaste < CRSR > -rechts kann die Markierung 
zyklisch nach rechts verschoben werden. Drücken Sie zur 
Probe kurz fünfmal diese Taste und beobachten Sie, wie die 
Markierung wandert. 

Das Programm ist wegen der Vielzahl der möglichen ver¬ 
schiedenen Kommandos in mehrere Menüs aufgeteilt, die 
wie eine Baumstruktur mit Verzweigungen angeordnet sind. 
Eine Zusammenfassung aller Befehle und deren Bedeutung 
enthält Bild 16. Im allgemeinen klettert man mit < RETURN > 
immer höher in diesen »Baum« und kommt mit der Taste < X > 
immer wieder eine Stufe zurück. An den Enden solcher ver¬ 
zweigenden Befehlsäste sitzen dann wie Blätter eines Bau¬ 
mes die eigentlich ausführbaren Kommandos. Auch diese 
benötigen normalerweise Zusatzinformationen, welche sie 
vom Benutzer anfordern. 

Menübegriffe stehen immer stellvertretend für eine Menge 
von Operationen, welche durch den Begriff grob vereinfacht 
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beschrieben wird. Um auszuwählen, muß die Markierung 
richtig eingestellt und die < RETURN > -Taste gedrückt wer¬ 
den. 

Hinter dem Begriff AUGEN stehen Operationen zur Festle¬ 
gung oder Änderung der Perspektive mit Hilfe des Augen¬ 
punktes (Beobachter) und des Blickpunktes (Ziel) eines vir¬ 
tuellen Betrachters und zur Erstellung von Bildschirmgrafi¬ 
ken. 

Der Begriff FORME steht stellvertretend für einige Grafik¬ 
operationen mit Punkten und Linien, die im allgemeinen 
anschaulich ausgelöst werden. 

Mit dem Begriff BEWEG sind bestimmte Bewegungen des 
Darstellungsobjekts auszulösen wie Drehungen, Verschie¬ 
bungen oder Verzerrungen. Hier besteht auch noch die Mög¬ 
lichkeit, ein Objekt oder Teile zu kopieren, so daß zum Bei¬ 
spiel aus einem Würfel schnell zwei oder mehr werden kön¬ 
nen. Ebenfalls untergebracht sind hier direkte Messungen 
am dreidimensionalen Darstellungsobjekt. 

Unter dem Menüpunkt DATEN werden etliche unanschauli¬ 
che Operationen an der Punkt- oder Linientabelle des Com¬ 
putermodells durchgeführt. Man kann sich die Tabellen auch 
ansehen. Unter DATEN sind auch die Lade- und Speicher¬ 
kommandos für ganze Datensätze zu finden sowie Disketten¬ 
operationen. Hinzu kommen Druckeroperationen und grafi¬ 
sche Darstellungen auf dem Bildschirm mit einem schritt¬ 
weise wandernden Beobachtungspunkt (Ansichtsbahnen). 

Unter dem Begriff KOPIE kann man von einer vorhandenen 
gültigen Grafik eine Hardcopy auf den Matrixdrucker MPS 
801 ausgeben. 

Stellen Sie nun die Markierung im Hauptmenü auf den 
Begriff DATEN ein und drücken < RETURN >. Falls Sie aus 
Versehen schon in ein anderes Untermenü hineingeraten 
sind, verlassen Sie dies vorher. Mit der Taste <X> oder 
<X> und <RETURN> kann man aus jedem Menüpunkt 
wieder herauskommen! 

Hinter dem Menüpunkt DATEN verbirgt sich ein weiteres 
Untermenü mit der Überschrift DATENEINGABE und mehre¬ 
ren Auswahlmöglichkeiten. Sie befinden sich nunmehr eine 
Stufe höher in der Kommandostruktur des Programms PED. 
Hinter allen Begriffen im Hauptmenü verbergen sich übrigens 
Untermenüs, von denen man bei Bedarf weiterklettern kann. 
Auf der äußersten Schicht liegen dann die eigentlichen Ope¬ 
rationen. Mit <X> oder <X> und <RETURN> kann man 



Bild 2. Auch »Kreise« sind möglich, dieser hier besteht aus 
30 Segmenten und erscheint daher fast rund 


333 ? 


jeweils eine Stufe zurückgelangen. Wenn man im Hauptmenü 
<X> eingibt, wird das Programm nach einer Sicherheitsab¬ 
frage beendet. Sichern Sie vor Beendigung des Programms 
stets ihre Daten auf Diskette. Diese sind sonst nämlich verlo¬ 
ren. 

Die Verzweigungsstruktur ist in einem Diagramm (Bild 17) 
zusammengestellt. 

Bei einigen Menüs wird durch Verschieben der Markierung 
und anschließendem < RETURN > ausgewählt, bei anderen 
Menüs ist eine Zahl oder ein Buchstabe einzugeben und 
gegebenenfalls noch < RETURN > zu drücken. Der Aus¬ 
stieg nach Ausführung eines Kommandos geht entweder 
automatisch oder mit <X> und eventuell <RETURN>. 
Man kann mit <X> auch ein Kommando abbrechen, falls 
man sich zum Beispiel versehen hat. Ein anderer Notausstieg 
ist die Eingabe sinnloser Daten für ein Kommando, wenn man 
zum Beispiel Punkte löschen läßt, die es im Datensatz gar 
nicht gibt. 

Eine vollständige Aufstellung aller Kommandos und Menü¬ 
punkte in alphabetischer Reihenfolge enthält zu jedem Punkt 
eine Bedienungsanleitung und erklärt den Zweck der jeweili¬ 
gen Operation. 

Hier soll nun ein kurzes Bearbeitungsbeispiel beschrieben 
werden. Im Menü DATENEINGABE, in das man von DATEN 
aus gelangt ist, wählen Sie 1 DATEN LADEN. Auf die Frage 
nach dem Filenamen geben Sie den Namen BEISPIEL ein 
und < RETURN >. Auf die nächste Frage antworten Sie mit 
<E>. Daraufhin wird ein Beispieldatensatz von der Pro¬ 
grammdiskette oder -kassette geholt. 

Wenn der Datensatz im Computer ist, kann man sich unter 
dem Menüpunkt 3 DATEN AENDERN die Punkt- und Linien¬ 
tabelle ansehen. Gehen Sie danach bis zum Hauptmenü 
zurück und wählen dort den Menüpunkt AUGEN, mit dem 
eine u rspektivische Darstellung angefertigt werden soll. 
Nach der Auswahl von AUGEN erscheint folgendes Unter¬ 
menü: 

X 1000000 
Y 0 

Z 0 

F 1000 

A 0 

Jeweils ein Feld ist markiert. Mit der Cursortaste 
<CRSR>-unten kann die Markierung zyklisch nach unten 
bewegt werden. Das Zahlenfeld beschreibt von oben nach 
unten die X-, Y- und Z-Koordinate des Augenpunktes, den 
Bildvergrößerungsfaktor und den Augenwinkel. Die oberen 
vier Werte sind durch Eingabe neuer Zahlen zu verändern. 
Der Augenwinkel ist lediglich ein Ausgabewert im 
360-Gradmaß. Alle Längenangaben sind in Millimeter zu ver¬ 
stehen. Der Vergrößerungsfaktor ist zur besseren Ausnut¬ 
zung des Bildschirms gedacht, beeinflußt die Perspektive 
des Bildes jedoch nicht. 

Mit < CRSR > -rechts kann ein Schreibfehler verbessert 
werden. 

Mit <Z> gelangt man in ein weiteres Menü, mit dem die 
Koordinaten des Blickpunktes verändert werden können. 
Außerdem ist dort ein Zoomfaktor für Bildausschnitte. Der 
Wert 1 ist Standard und bewirkt, daß ein zu großes Bild soweit 
verkleinert wird, daß es vollständig auf den Schirm paßt. Bei 
einem Zoomwert 2 hingegen wird erst verkleinert, wenn die 
Bildmaße zweimal so groß wie die Schirmmaße sind etc. 

Mit < RETURN > wird ein perspektivisches Bild gezeich¬ 
net. Das dauert je nach Umfang des Datensatzes immer 
etwas. Das Bild ist fertig, wenn die X-Koordinate wieder mar¬ 
kiert ist. Probieren Sie ein paar unterschiedliche Perspekti¬ 
ven aus. Mit <X> gelangen Sie wieder in das Hauptmenü. 

In vielen Kommandos ist das Anpicken von Punkten mittels 
eines beweglichen Fadenkreuzes erforderlich. Gehen Sie 
zum Üben unter BEWEG in das Untermenü MESSW. Stellen 
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Sie WINKL ein und drücken < RETURN >. In der Bildmitte 
erscheint ein kleines Fadenkreuz. Sie können es mit den Cur¬ 
sortasten bewegen. Dabei kann man mit unterschiedlicher 
Schrittweite Vorgehen. Mit < V> wird zwischen schnell und 
langsam umgeschaltet und mit < + > und <-> kann noch 
quantitativ variiert werden. Probieren Sie einige Schrittgrö¬ 
ßen aus. 

Nun sollen für eine Winkelmessung drei Linienendpunkte 
angepickt werden. Fahren Sie das Kreuz ganz in die Nähe 
des ersten Punktes Ihrer Wahl und drücken auf 
< RETURN >. Die Markierung im Menü verschwindet kurz 
zur Quittierung der Aktion. Ausgewählt wird intern derjenige 
Linienendpunkt, der auf dem Bildschirm dem Kreuz am näch¬ 
sten ist. Da muß man aufpassen. Fahren Sie noch zwei wei¬ 
tere Linienendpunkte auf dieselbe Art an. Nach dem dritten 
Punkt erscheint auf dem Bildschirm derjenige wahre Winkel 
im 360-Gradmaß, dessen Schenkel durch die drei Punkte 
beschrieben wurden. Der zweite Punkt ist stets der Schnitt¬ 
punkt der Schenkel. Mit <X> geht es zurück in das Menü 
MESSW mit seinen fünf Wahlmöglichkeiten. 

Das Auswahlverfahren für die drei Winkelpunkte kann übri¬ 
gens jederzeit mit <X> abgebrochen werden. Auch bei 
einer fehlerhaften Auswahl erscheint kein Winkelwert, son¬ 
dern man landet direkt im Menü MESSW. 

Dies war ein Einblick in die Arbeitsweise des Programms. 
Weitere Einzelheiten entnehmen Sie bitte der nun folgenden, 
alphabetisch sortierten Einzelbeschreibung der Menü¬ 
punkte. 

Die Befehle 


ABSGG 

Messung des Abstandes zweier windschiefer Geraden. 
Die kürzeste Entfernung wird ermittelt. 

Menüpfad: BEWEG/MESSW/ABSGG 

Nach der Auswahl von ABSGG erscheint das Fadenkreuz. 
Durch Anpicken zweier Punkte wird eine erste Gerade defi¬ 
niert. Durch Anpicken zweier weiterer Punkte eine zweite 
Gerade. Danach erscheint der wahre Abstand dieser Gera¬ 
den auf dem Bildschirm. 

Die Geraden dürfen nicht parallel verlaufen. In solchen Fäl¬ 
len verwendet man den Menüpunkt ABSPG. Zwei Punkte, die 
nicht Endpunkte einer Linie sind, können trotzdem eine 
Gerade definieren. 

Wenn ein Fehler auftritt, wird kein Abstand ermittelt, son¬ 
dern direkt in das Menü zurückgesprungen. Als Ursachen 
kommen in Frage: parallele Geraden, zwei gleiche Punkte, 
ungültiges Bild wegen vorheriger Datenänderung oder 
-Ordnung. 

ABSPE 

Messung des Abstandes eines Punktes von einer Ebene. 
Die kürzeste Entfernung wird ermittelt. 

Menüpfad: BEWEG/MESSW/ABSPE 

Nach der Auswahl von ABSPE erscheint das Fadenkreuz. 
Durch Anpicken eines Punktes wird der Meßpunkt festge¬ 
legt. Durch Anpicken dreier weiterer Punkte wird eine Ebene 
definiert. Danach erscheint der wahre Abstand des Punktes 
von der Ebene auf dem Bildschirm. 

Die drei Ebenenpunkte können auf ganz beliebigen Linien 
liegen. 

Wenn ein Fehler auftritt, wird kein Abstand ermittelt, son¬ 
dern direkt in das Menü zurückgesprungen. Als Ursachen 
kommen in Frage: zweimal der gleiche Punkt, drei Punkte auf 
einer Geraden, ungültiges Bild wegen Datenänderung oder 
-Ordnung. 

ABSPG 

Messung des Abstandes eines Punktes von einer Gera¬ 
den. Die kürzeste Entfernung wird ermittelt. 



Menüpfad: BEWEG/MESSW/ABSPG 

Nach der Auswahl von ABSPG erscheint das Fadenkreuz. 
Durch Anpicken eines Punktes wird der Meßpunkt festge¬ 
legt. Durch Anpicken zweier weiterer Punkte wird eine 
Gerade definiert. Danach erscheint der wahre Abstand des 
Punktes von der Geraden auf dem Bildschirm. 

Die Geradenpunkte müssen nicht unbedingt auf einer der 
dargestellten Linien liegen. 

Wenn ein Fehler auftritt, wird kein Abstand ermittelt, son¬ 
dern direkt in das Menü zurückgesprungen. Als Ursachen 
kommen in Frage: zweimal der gleiche Geradenpunkt sowie 
ungültiges Bild wegen Datenänderung oder -Ordnung. 

ALLES LOESCHEN 

Linien- und Punkttabelle werden vollständig gelöscht, um 
ein neues Modell aufbauen zu können. 

Menüpfad: DATEN/DATEN AENDERN/FORMEN/ALLES 
LOESCI IEN 

Auf dem Bildschirm erscheint eine Sicherheitsabfrage. 
Durch Eingabe von < J>, für ja, wird der Löschvorgang aus¬ 
gelöst. Durch Eingabe von < N >, für nein, kann das Löschen 
unterdrückt werden. In jedem Falle kehrt man wieder in das 
Menü zurück. 

Wenn anschließend ein neuer Datensatz von Diskette ein¬ 
gelesen wird, kann auf die Operation ALLES LOESCHEN ver¬ 
zichtet werden, da dies vor dem Laden automatisch 
geschieht, wenn man dort <E> für Ersetzen eines Daten¬ 
satzes angibt. 

Mit der Operation ALLES LOESCHEN werden nur 
bestimmte Einträge in den Tabellen auf den Wert -1 gesetzt. 
Das Programm erkennt daran, daß eine Linie beziehungs¬ 
weise ein Punkt ungültig ist. Die Zeiger auf die Tabellenenden 
werden auch zurückgesetzt. 

Eine vorhandene Grafik wird durch den Befehl ALLES LOE¬ 
SCHEN nicht automatisch gelöscht. Sie wird aber ungültig für 
alle grafischen Operationen, so daß nicht mehr auf diese Gra¬ 
fik zugegriffen werden kann. 

ANSICHTSBAHNEN 

Erzeugung und Ablauf einer Folge von unterschiedlichen 
Ansichten eines Objekts. Der die Ansicht bestimmende 
Augenpunkt kann in gleichmäßigen Schritten längs einer 
Gerade, einer Spirale oder eines Kreises bewegt werden. 
Das Auge ist bei jeder Ansicht immer auf den Blickpunkt 
gerichtet, welcher stets in der Bildmitte liegt. 

Menüpfad: DATEN/ANSICHTSBAHNEN 

Durch Eingabe von < G > wird eine gerade Bahn ausge¬ 
wählt. Mit <K> werden dagegen Kreis- oder Spiralbahnen 
des Augenpunktes eingeleitet. Mit <X> kann man in das 
Menü zurückgelangen. Als nächstes wird eine Schrittzahl 
zwischen 2 und 3600 eingegeben. Dies entspricht der 
Anzahl der zu erstellenden Bilder, wobei der gesamte Weg 
des Augenpunktes entsprechend in gleichgroße Teilwege 
zerlegt wird. 
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Danach sind die X-, Y- und Z-Koordinate des Anfangspunk¬ 
tes der Ansichtsbahn einzugeben. Der voreingestellte Wert 
für X, Y und Z kann durch Drücken von < RETURN > bestä¬ 
tigt werden. Andere Werte müssen explizit eingegeben wer¬ 
den. 

Dieselben Abfragen wiederholen sich bei dem Endpunkt 
der Ansichtsbahn. Kreisartige Bahnkurven werden stets im 
mathematisch positiven Sinn durchlaufen. 

Für eine Kreisbahn um die Z-Achse ab der letzten Position 
des Auges ist somit nur sechsmal < RETURN > zu drücken. 
Während der Bildfolge wird die Bildnummer angezeigt. Man 
kann die Bildfolge vorzeitig mit <X> abbrechen. Es wird 
dann nur noch das laufende Bild fertiggestellt und anschlie¬ 
ßend ins Menü gesprungen. Damit kann man interessante 
Ansichten auswählen und festhalten. Das letzte erzeugte Bild 
ist gültig für alle grafischen Operationen. 

Nach normaler Beendigung der Ansichtsbahn bleibt das 
letzte Bild stehen, bis mit X ins Menü zurückgekehrt wird. 

Wenn während der Bildfolge das Bild des Darstellungsob¬ 
jekts zu groß wird, erfolgt jeweils eine maßstäbliche Verklei¬ 
nerung des Bildes (nicht des Objekts). 

Bildausschnitte können mit Hilfe des Zoomfaktors (siehe 
AUGEN) bis zu einer bestimmten Größe vorgewählt werden. 
AUGEN 

Festlegung und Änderung der Koordinaten des Augen- und 
des Blickpunktes, welche die Bildperspektive bestimmen. 
Außerdem kann man über einen Vergrößerungsfaktor die 
Bildgröße innerhalb der zugelassenen Bildschirmgrenzen 
festlegen. Mit dem Zoomfaktor können Bildausschnitte zuge¬ 
lassen werden. 

Eine neue grafische Darstellung läßt sich erzeugen (Bild 4 
und 5). Menüpfad: AUGEN 

Nach der Auswahl von AUGEN erscheint ein Eingabemenü 
folgender Art. 

X 1000000 
Y 0 

Z 0 

F 1000 

A 0 

Die ersten drei Werte sind die X-, Y- und Z-Koordinate des 
Augenpunktes. Die augenblicklichen Werte werden ange¬ 
zeigt. Der vierte Wert ist ein Vergrößerungsfaktor F für das 
Bild. Für alle Größen können bei Änderungen lediglich ganz¬ 
zahlige Werte eingegeben werden. 

Der letzte Wert ist nur ein Ausgabewert. Er bestimmt den 
maximalen Augenwinkel im 360-Gradmaß zwischen dem 
Auge und den extremen Rändern einer Darstellung. 

Beim Augenwinkel beachte man, daß das Auge stets auf 
den Blickpunkt gerichtet ist, welcher stets in der Bildschirm¬ 
mitte liegt, so daß bei einem nicht gleichmäßig um den Blick¬ 
punkt verteilten Objekt ein großer Wert erscheint. Augenwin¬ 
kel bis 30 Grad entsprechen dem normalen Sehen. 0 Grad 
entspricht einer exakten Parallelperspektive. Diesem Wert 
kann man durch proportionale Vergrößerung von X, Y, Z und 
F nahekommen. Augenwinkel oberhalb 50 Grad werden als 
unnatürlich empfunden. Sie sind von Kameras mit Weitwin¬ 
kelobjektiv technisch machbar. 

Sollen X, Y, Z oder F geändert werden, so muß man mit der 
Taste <CRSR>-unten zuerst die Markierung auf die ent¬ 
sprechende Variable stellen. Die Markierung läuft dabei 
zyklisch durch. Beim Wechsel der Markierung wird der dann 
vorhandene Wert übernommen. Er wird aber auch übernom¬ 
men nach < X >, womit man wieder in das Hauptmenü kommt 
oder nach < RETURN >, womit man die Erzeugung einer 
perspektivischen Darstellung startet. 

Wenn das neue Bild erscheint und das X-Feld wieder mar¬ 
kiert ist, kann man Weiterarbeiten. 

Mit der <Z>-Taste kann man vom Augen- auf den Blick¬ 
punkt umschalten. Hier werden der Reihe nach die Koordina¬ 
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ten und dann der Zoomfaktor abgefragt. Ein Zoomfaktor von 
1 ist der Standardwert und bewirkt, daß ein Bild, das größer 
als der Bildschirm ist, verkleinert wird. Mit einem Faktor grö¬ 
ßer als 1 werden entsprechend größere Bilder noch ohne 
Verkleinerung dargestellt. Dadurch erhält man unter anderem 
auch Bildausschnitte. 

Ungünstig plazierte Bilder werden zum Teil von Menüs 
überschrieben. Die danach unsichtbaren Teile sind aber nach 
wie vor gültig. Dies ist wichtig beim Gebrauch grafischer 
Operationen. Alle grafischen Operationen setzen eine gül¬ 
tige grafische Darstellung voraus. 

Für schnellere Korrektur von Eingabefehlern kann man die 
Taste <CRSR>-rechts verwenden. Es erscheint dann der 
letzte gültige Wert linksbündig im jeweiligen Zahlenfeld und 
kann erneut überschrieben werden. 

Die Koordinatenwerte sind im allgemeinen in Millimeter zu 
verstehen. F ist dimensionslos und muß ausprobiert werden. 
Ein zu großes F schadet nicht, solange der Zoomfaktor auf 1 
steht, weil bei der Bilderstellung F automatisch korrigiert 
wird, bis das Bild auf den Bildschirm paßt. 

Die Lage der Koordinatenachsen ist mit den Voreinstellun¬ 
gen bei Programmstart wie folgt: 

Der Ursprung ist in der Bildmitte. 

Die X-Achse zeigt senkrecht aus dem Bildschirm heraus 
zum Bearbeiter hin. Die Y-Achse zeigt horizontal nach rechts 
auf dem Schirm und die Z-Achse senkrecht nach oben aus 
dem Schirm heraus. 

Diese Lage ändert sich mit dem Augenpunkt. Man kann zur 
Orientierung ein Koordinatensystem in das Darstellungsob¬ 
jekt hineinkonstruieren, wie dies im Daten-File »BEISPIEL« 
mit den Punkten 9990 bis 9997 gezeigt wird. Solch ein 
Koordinatensystem kann bei Bedarf in jede andere Darstel¬ 
lung von der Diskette dazugeladen werden. Wählen Sie dazu 
im Me. jpunkt DATEN LADEN die Betriebsart A für das Anfü¬ 
gen eines Datensatzes. 

Wenn der Augenpunkt einem Objektpunkt, einer Objektli¬ 
nie oder einer Objektebene zu nahe kommt, versagt die per¬ 
spektivische Darstellung. Es erscheint eine Fehlermeldung: 
OBJEKTPUNKT .... NAHE BILDEBENE 
BITTE AUGENPUNKT VERLEGEN 

Anschließend werden wie oben die X-, Y- und Z-Koordinate 
des Augenpunktes geändert. Danach versucht das Pro¬ 
gramm erneut, eine perspektivische Darstellung zu erzeu¬ 
gen. 

Aufgrund des Berechnungsverfahrens sind Augenpunkte 
mit den Werten X=0 und Y=0 nicht möglich. Meistens hilft 
eine kleinere Änderung in X. 

Sollten unerwartete Bilder entstehen, ist zunächst der 
Augenwinkel und dann der Faktor F zu prüfen. Großer Winkel 
und kleines F weisen auf unnatürliche Perspektiven hin. Der 
Augenpunkt kann sogar im Inneren des Objektes liegen! 

BEWEG 

Menü zum Vermessen, Verschieben, Drehen, Vergrößern, 
Verkleinern, Spiegeln oder Kopieren von Teilobjekten, wenn 
eine gültige perspektivische Darstellung vorhanden ist. 
Menüpfad: BEWEG 

Nach der Auswahl von BEWEG verschwindet das Menü 
und es erscheint ein neues Menü mit den folgenden Begrif¬ 
fen: 

MESSW GERAD DREHG MASTB SPIEG 

Als Voreinstellung wird stets der erste Menüpunkt mar¬ 
kiert. Diese Markierung kann mit der Taste < CRSR > -rechts 
zyklisch verschoben werden, so daß auf SPIEG wieder 
Menüpunkt MESSW folgt. Mit < RETURN > wird eine Aus¬ 
wahl vorgenommen, mit < X > gelangt man in das übergeord¬ 
nete Menü zurück. 

BIBLI 

Menüpunkt zum Erzeugen von Quadraten und Würfeln 
beliebiger Kantenlänge (Bild 12). 
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Menüpfad: FORME/BIBLI 

Nach der Auswahl von BIBLI verschwindet die Grafik, und 
es erscheint ein Menü folgender Form: 
STANDARDFORMEN 

1 QUADRAT IN DER XY-EBENE 

2 QUADRAT IN DER XZ-EBENE 

3 QUADRAT IN DER YZ-EBENE 

4 EINHEITSWUERFEL 

X RETURN 

BITTE EINGEBEN 

Nach Auswahl einer der Möglichkeiten mit der entspre¬ 
chenden Taste wird nach der Kantenlänge des Objekts 
gefragt. Die Lage der Objekte kann nicht beeinflußt werden. 
Ein Eckpunkt liegt stets im Ursprung. Alle Seiten sind parallel 
zu den positiven Koordinatenachsen. 

Nach Eingabe der Punktnummer des Raumpunktes, der im 
Ursprung liegt (Anfangspunkt), werden die restlichen Punkte 
des Objekts automatisch mit fortlaufenden Nummern verse¬ 
hen. Man beachte, daß hierdurch keine Doppelnumerierung 
im Datensatz entstehen darf. Die Linientabelle wird ebenfalls 
automatisch ergänzt. 

Nach dem abschließenden < RETURN > wird eine neue 
Grafik erstellt, in der die eben ausgewählte Standardform ein¬ 
gefügt ist. 

Das Programm wird im Untermenü FORME fortgesetzt. 

BILDPUNKTE 

Numerische Anzeige der Bildpunkttabelle des Konstruk¬ 
tionsmodells. 

Menüpfad: DATEN/DATEN AENDERN/BILDPUNKTE 
Nach der Auswahl des Menüpunktes werden die ersten 20 
Elemente der Bildpunkttabelle angezeigt. Jeder Punkt 
besteht aus einer Punktnummer von 0 bis 9999 und zwei 
Koordinatenwerten X und Y. 

Mit der >-Taste und der <-Taste kann man in der Tabelle 
seitenweise um 20 Plätze zurück- oder vorwärtsblättern. Mit 
<HOME> wird der nicht blinkende Cursor auf die oberste 
Schreibstelle gesetzt, mit der Taste < RETURN > auf die 
nächstfolgende. Mit den Cursortasten kann der Cursor 
außerdem in alle Richtungen bewegt werden. 

Die auf dem Bildschirm angezeigten Werte können zwar 
beliebig überschrieben werden, jedoch werden die verän¬ 
derten Werte nicht vom Programm übernommen. 

Die Genauigkeit der Bildkoordinaten ist auf 0,001 
begrenzt. Punkte mit der Nummer -1 existieren für das Kon¬ 
struktionsmodell nicht. 

Mit <X> kann man den Menüpunkt BILDPUNKTE verlas¬ 
sen. Falls Änderungen vorgenommen wurden, Ist dies völlig 
ohne Bedeutung für das Konstruktionsmodell. 

Für das Schreiben in der Tabelle sind bestimmte Felder fest 
vorgegeben. Beim Verlassen eines Schreibfeldes springt der 
Cursor stets auf die erste Stelle des nächsten Schreibfeldes. 

Die Begrenzung von 40 Zeichen pro Bildschirmzeile ver¬ 
langt, daß Koordinatenwerte nicht in maximaler Genauigkeit 
angezeigt werden. Eine Genauigkeit von 0,001 sollte für 
Handzeichnungen auch in großem Maßstab ausreichend 
sein. Aus der Linien- und der Bildpunkttabelle kann man 
sogar ohne Drucker oder Plotter einfach Handzeichnungen 
einer Konstruktion erstellen. Für die richtige Anpassung des 
Maßstabes an das Papierformat verwende man den Menü¬ 
punkt BEWEG/MASTB. 

BLINDPUNKTE/LINIEN 

Punkte, die in keiner Linie mehr auftreten und Linien, die 
nicht existierende Punkte enthalten, werden gelöscht. 
Menüpfad: DATEN/DATEN ORDNEN/BLINDPUNKTE/ 
LINIEN 

Durch verschiedene Konstruktionsschritte kann es dazu 
kommen, daß sich Punkte in der Punkttabelle befinden, die 
in keiner der konstruierten Linien enthalten sind. Derartige 
Blindpunkte können mit DIREKTBEFEHL < M > zwar in einer 


Grafik der Konstruktion sichtbar gemacht werden, aber leicht 
können Blindpunkte auch zu einer fehlerhaften Punktaus¬ 
wahl führen, wenn man sie übersieht (Bilder 14 und 15). 

Seltener treten solche Probleme durch Blindlinien auf. 
Diese Linien enthalten Punktnummern, die in der Punktta¬ 
belle nicht vorhanden sind. 

Die Blindpunkte/-Iinien werden dadurch beseitigt, daß 
anstelle einer Punktnummer als Löschmerkmal -1 für die 
Punktnummer eingetragen wird. Damit können irgendwelche 
Kommandos nicht mehr auf diese Einträge ztlgreifen. 

DATEN 

Mit diesem Menü können einige nichtgrafische Komman¬ 
dos wie Eingabe oder Ausgabe numerischer Daten, Spei¬ 
chern, Laden oder Ordnen aber auch Druckeroperationen, 
Diskettenoperationen und Bilderfolgen ausgewählt werden. 
Menüpfad: DATEN 

Nach der Auswahl von DATEN erscheint ein Menü folgen¬ 
der Form: 

DATENEINGABE 

1 DATEN LADEN 

2 DATEN SPEICHERN 

3 DATEN AENDERN 

4 DATEN ORDNEN 

5 DATEN DRUCKEN/PLOTTEN 

6 DISKETTENVERZEICHNIS 

7 DATENFILE AENDERN 

8 ANSICHTSBAHNEN 
X RETURN 

BITTE EINGEBEN 

Durch Eingabe von <X> kommt man in das übergeord¬ 
nete Hauptmenü zurück. Ansonsten gelangt man mit den 
Tasten <1 > bis <8 > in andere Untermenüs für die ange¬ 
gebenen Kommandos. 

DATEN '..ADEN und DATEN SPEICHERN sind Disketten¬ 
operationen für ganze Datensätze, wobei beim Laden auch 
die Möglichkeit des Anfügens besteht. 

Mit DISKETTENVERZEICHNIS kann man sich eine Über¬ 
sicht über alle Datensätze auf einer Diskette verschaffen. 

Unter DATENFILE AENDERN ist das Löschen oder Umbe¬ 
nennen von Datenfiles möglich. 

DATEN AENDERN erlaubt direkte Änderungen an der 
Punkt- oder Linientabelle des Computermodells. Es gibt aber 
auch Operationen für ganze Gruppen von Punkten oder 
Linien, bei denen aber keinerlei anschauliche Hilfe durch die 
Grafik besteht. Nach dem Ändern ist eine vorher gültige Gra¬ 
fik stets ungültig und muß vor dem Gebrauch grafischer Kom¬ 
mandos erst im Menü AUGEN neu erstellt werden. Eine 
ungültige Grafik ist solange noch sichtbar, bis sie durch eine 
neue gültige Grafik ersetzt wird! 

Das DATEN ORDNEN empfiehlt sich ab und zu, um Platz im 
Konstruktionsspeicher zu schaffen oder nach der Fertigstel¬ 
lung eines Modells, um Ordnung zu schaffen und überflüs¬ 
sige Daten zu beseitigen. 

Die Druckeroperationen bis auf die Hardcopy einer Grafik 
befinden sich in dem Menüpunkt DATEN DRUCKEN/PLOT¬ 
TEN. 

DATEN AENDERN 

Es können direkte numerische Veränderungen am Daten¬ 
satz in Linien- und Punkttabelle vorgenommen werden. Dabei 
können ganze Punktgruppen bearbeitet werden. Eine unmit¬ 
telbare grafische Kontrolle der Operationen ist nicht möglich. 
Menüpfad: DATEN/DATEN AENDERN 
Nach der Auswahl des Menüpunktes erscheint ein weite¬ 
res Untermenü, in dem genauer festgelegt wird, welche Art 
von Änderung gewünscht wird. Es hat die Form 
DATEN AENDERN 

1 LINIEN 

2 PUNKTE 

3 FORMEN 
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Bild 4. Muster eines Roboterarms. In dieser Perspektive sind 
alle Punkte eindeutig zu erkennen. 


4 SYSTEM 

5 BILDPUNKTE 
X RETURN 
BITTE EiNGEBEN 

Unter LINIEN oder PUNKTE hat man direkten Zugriff auf 
jeden Wert der jeweiligen Tabelle. Aus diesen Tabellen baut 
der Computer bekanntlich das grafische Modell auf. Dies ist 
zu Überprüfungen einer Konstruktion, aber auch zur direkten 
Eingabe von vorher vermaßten Zeichnungen sinnvoll. 
Manchmal kann man in den Tabellen auch Bedienungsfehler 
ausbügeln. 

Unter FORMEN sind bestimmte Operationen an Gruppen 
von Punkten oder Linien möglich, wie etwa Löschen oder 
Kopieren von ganzen Gruppen. Dabei muß der Benutzer 
selbst auf Überschneidungen bei der Numerierung achten. 

Der Menüpunkt SYSTEM ist für bestimmte Programmein¬ 
stellungen vorgesehen. Ohne Kenntnis des Programms soll¬ 
ten hier keine Änderungen vorgenommen werden. 

Die Bildschirmkoordinaten der Bildpunkte erhält man mit 
der Taste < 5 > angezeigt. 

Mit < X > gelangt man in das übergeordnete Menü DATEN¬ 
EINGABE zurück. 

DATEN DRUCKEN/PLOTTEN 
Sämtliche Daten einer Konstruktion können auf einem 
Drucker des Typs MPS 801 ausgegeben werden. Ferner las¬ 
sen sich die Daten für Bildgröße und Perspektive aus- 
drucken. Ein Plotfile für einen Plotter des Typs CBM 8075 
kann auf Diskette oder Kassette gespeichert werden. 
Menüpfad: DATEN/DATEN DRUCKEN/PLOTTEN 
Nach der Auswahl des Menüpunktes erscheint ein weite¬ 
res Untermenü, in dem genauer festgelegt wird, welche Ope¬ 
ration auszuführen ist. 

DRUCKEROPERATIONEN 

1 PAPIERVORSCHUB 

2 LINIEN 

3 PUNKTE 

4 BILDPUNKTE 

5 AUGENPUNKT 

6 PLOTFILE 
X RETURN 
BITTE EINGEBEN 

Vor dem Gebrauch der Kommandos ist der Drucker einzu¬ 
schalten. 


Mit der Taste <1 > kann der Papiervorschub gesteuert 
werden. Das Programm enthält dazu einen Druckzeilenzäh¬ 
ler, der mit den Tasten <R>, <S>, <A>, <X> und <1 > 
bis <9> beeinflußt werden kann. Bei Programmbeginn 
steht der Zähler auf dem Wert Null, entsprechend Seitenan¬ 
fang. 

Der Seitenvorschub erfolgt nach 63 Druckzeilen. 

Die gedruckten Tabellen sind bereinigt, so daß dort keine 
als gelöscht gekennzeichneten Punkte oder Linien aufge¬ 
führt werden. 

Bei den Linien werden die Punktnummern des Anfangs¬ 
und Endpunktes ausgegeben. Diese sind nicht mit den lau¬ 
fenden Nummern zu verwechseln. 

Die Punkte sind Raumpunkte mit einer Punktnummer und 
drei Koordinaten. Bei einer Einheit von 1 mm wird mit einer 
Genauigkeit von 0,001 mm ausgedruckt. 

Die Bildpunkte sind den Raumpunkten eindeutig zugeord¬ 
net. Sie haben nur zwei Bildkoordinaten im Bereich der Bild¬ 
schirmkoordinaten. Überschreitungen der Bereiche 
0<x<319 und 0<y<199 sind möglich und deuten nicht 
auf Fehler hin. Die Ausgabe erfolgt auf drei Stellen nach dem 
Komma genau. Mit den Bildkoordinaten und der Linientabelle 
lassen sich auch von Hand perspektivische Darstellungen 
mit hoher Genauigkeit anfertigen, falls kein Plotter verfügbar 
ist und die Qualität der Hardcopy nicht ausreicht. 

Zu jeder Hardcopy empfiehlt sich die Ausgabe der Per¬ 
spektive (Augenpunkt, Blickpunkt, Vergrößerungsfaktor, 
Zoomfaktor) zwecks Rekonstruktion. 

Das Plotfile hat ein genau festgelegtes Format. Nach der 
Anzahl der Punkte und Linien folgen punktweise die Punkt¬ 
nummer und die auf Plotterformat umgerechneten Bildpunkt¬ 
koordinaten. Danach folgt die Linientabelle. Mit Löschver¬ 
merk gekennzeichnete Punkte und Linien sind im Plotfile ent¬ 
haltet 

Für das Plotfile ist ein Filename einzugeben, der das File als 
Plotfile kennzeichnet, zum Beispiel durch den Zusatz »/P«. 

Mit < X > kann man in das übergeordnete Menü gelangen. 

DATENFILE AENDERN 

Änderungen des Inhaltsverzeichnisses und des Inhalts 
einer Diskette. 

Menüpfad: DATEN/DATEN AENDERN 

Die zu bearbeitende Diskette muß vor dem Kommando ein¬ 
gelegt worden sein. Nach der Auswahl dieses Menüpunktes 
erscheint der Text 

DATENFILE LOESCHEN,UMBENENNEN 
(L/U/X)? 

Nach der Eingabe eines der Zeichen <L> oder <U> 
wird nach den Namen der Files gefragt, an dem eine Opera¬ 
tion vorgenommen werden soll. <L> steht für Löschen, 
<U> für Umbenennen. 

Bei Diskettenfehlern gelangt man auch in dieses Menü 
zurück. 

DATEN KOMPRIMIEREN 

Punkt- und Linientabelle werden nach gelöschten Elemen¬ 
ten durchsucht. Diese Lücken werden aufgefüllt mit gültigen 
Elementen. Dadurch reduziert sich die Länge des Datensat¬ 
zes. Es ist wieder mehr Platz für weitere Einträge. 
Menüpfad: DATEN/DATEN ORDNEN/DATEN KOMPRIMIE¬ 
REN 

Durch verschiedene Konstruktionsschritte kommt es zu 
Löschungen in der Punkt- und Linientabelle. Diese Lücken 
erkennt man bei der direkten Bearbeitung der Tabellen an der 
Kennzahl -1, die normalerweise als Punktnummer unzulässig 
ist. Die anderen Daten eines Konstruktionseintrags können 
beliebig sein, da sie vom Programm bei der Ausführung aller 
Kommandos, die auf Punkte oder Linien zugreifen, überlesen 
werden. 

Andererseits werden neue Daten vom Programm stets in 
den Tabellen hinten angefügt. Dadurch kann es kommen, daß 
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der Tabellenspeicher irgendwann einmal erschöpft ist, auch 
wenn im Vorderteil zahlreiche Einträge gelöscht sind. In die¬ 
sem Falle hilft das Komprimieren. 

Bei der Ausführung werden die Lücken in den Tabellen von 
vorne nach hinten aufgefüllt mit Daten, die jeweils vom Ende 
des Datensatzes genommen werden. 

Nach dem Komprimieren weisen die dafür vorgesehenen 
Zeiger auf das Ende des genutzten Teils der Tabelle. Dadurch 
wird auch die Bearbeitungsdauer der Kommandos etwas ver¬ 
kürzt. 

DATEN LADEN 

Ein vorher gespeicherter Datensatz einer Konstruktion 
kann zwecks Weiterbearbeitung von Diskette oder Datasette 
geladen werden. Man kann auch mehrere Datensätze durch 
Anfügen zu einem neuen Datensatz zusammensetzen. 
Menüpfad: DATEN/DATEN LADEN 

Nach der Auswahl des Menüpunktes wird angezeigt, wel¬ 
cher Datensatz zuletzt geladen oder gespeichert worden ist. 
Danach folgt die Aufforderung, den Namen des zu ladenden 
Datensatzes einzugeben. Wenn lediglich < RETURN > 
gedrückt wird, wird als Voreinstellung der obengenannte 
Name verwendet. Mit <X> kann man das Kommando auch 
abbrechen. 

Danach wird abgefragt, ob beim Laden ein vorhandener 
Datensatz ersetzt, das heißt gelöscht werden soll (Eingabe 
<E>), oder ob der zu ladende Datensatz an einen vorhan¬ 
denen Datensatz angefügt werden soll (Eingabe <A>). 
Auch hier kann mit <X> die Operation noch abgebrochen 
werden. 

Falls ein Diskettenfehler auftritt, wird dies gemeldet und 
man kann mit <X> wieder in das übergeordnete Menü 
DATENEINGABE gelangen. Dort landet man auch stets nach 
erfolgreicher Ausführung des Kommandos. 

Nach dem Laden empfiehlt sich stets eine grafische Dar¬ 
stellung und ein Blick in die Tabellen, um zu prüfen, ob der 
gewünschte Datensatz vorhanden ist. 

Beim Anfügen von Datensätzen ist vom Benutzer sicherzu¬ 
stellen, daß die Numerierung des zu ladenden Datensatzes 
sich nicht mit der des im Rechner bereits vorhandenen über¬ 
schneidet. Eine nachträgliche Umnumerierung kann schwie¬ 
rig und langwierig werden, da die meisten Kommandos von 
einem überschneidungsfreien Datensatz ausgehen. Mei¬ 
stens hilft nur noch die Korrektur von Hand in der Punkt- und 
Linientabelle oder ein vollständiges Neuladen. Beim Anfügen 
werden wegen der besseren Ausnutzung des Konstruktions¬ 
speichers alter und neuer Datensatz vermischt, soweit im 
alten Datensatz noch freier Platz ist. 

Bei Verwendung einer Datasette ergeben sich praktisch 
keine Unterschiede, wenn man von der Bedienung der 
Datasetten-Tasten absieht. Die Zählerstände der Datasette 
sollte man sich aber notieren. Die Voreinstellung des Daten¬ 
speichergerätes erfolgt im Menü DATEN/DATEN AEN- 
DERN/SYSTEM in der Variable PD. PD=1 ist für die Datasette 
reserviert, PD=8,9,10,11 für Diskettenlaufwerke. 

DATEN ORDNEN 

Beseitigung überflüssiger oder störender Daten im Kon¬ 
struktionsspeicher. Zusätzlich ist eine Sortierung nach 
Punktnummern möglich. Bei längerem Konstruieren muß ab 
und zu durch Komprimieren im Konstruktionsspeicher aufge¬ 
räumt werden, da die Kommandos entweder Daten anfügen 
oder herauslöschen. 

Menüpfad: DATEN/DATEN ORDNEN 

Nach der Auswahl des Menüpunktes erscheint ein weite¬ 
res Untermenü, in dem genauer festgelegt wird, welche Ope¬ 
ration auszuführen ist. 

DATEN ORDNEN 

1 DATEN KOMPRIMIEREN UND SORTIEREN 

2 DATEN SORTIEREN 

3 DOPPELPUNKTE/LINIEN REDUZIEREN 


4 BLINDPUNKTE/LINIEN LOESCHEN 
X RETURN 
BITTE EINGEBEN 

Bei bestimmten Operationen wie zum Beispiel dem 
Löschen von Punkten, wird der linear angeordnete Datensatz 
nicht automatisch auf die notwendige Länge reduziert. Statt 
dessen wird durch Eintragung des Kennzeichens -1 der ent¬ 
sprechende Punkt unbrauchbar gemacht. Durch die Kompri¬ 
mierung werden derartige Lücken im Datensatz beseitigt, die 
nicht mehr genutzt werden. 

Wenn man zur Übersicht oder zwecks Datenausgabe eine 
feste Reihenfolge nach aufsteigenden Punktnummern haben 
möchte, kann man Linien- und Punkttabelle sortieren lassen. 

Nach Komprimieren oder Sortieren ist eine vorhandene 
Grafik nicht mehr gültig, weil nicht alle Tabellen mitgeändert 
werden. Unter AUGEN muß das Bild erneut erzeugt werden. 

Doppelpunkte und Doppellinien entstehen zum Beispiel 
bei Kopieroperationen. Es entstehen Punkte mit unter¬ 
schiedlicher Nummer, welche denselben geometrischen Ort 
haben. Solange diese Punkte zu Teilobjekten gehören, die 
noch getrennt bearbeitet werden sollen, kann auf eine Redu¬ 
zierung verzichtet werden. Am Ende des Konstruktionsvor¬ 
gangs empfiehlt sich aber die Beseitigung der Doppelpunkte. 
Doppelpunkte sind nicht immer ansprechbar, da die Auswahl 
durch das Programm stets nur einen der mehreren Doppel¬ 
punkte auswählt. Auch bei Löschoperationen sind Doppel¬ 
punkte und -linien störend. Nach der Doppelpunktoperation 
ist eine vorhandene Grafik nicht mehr gültig. 

Die Genauigkeitsgrenze zur Unterscheidung von Punkten 
liegt bei 0,002 mm Abstand, wenn mit der Längeneinheit 
1 mm gearbeitet wird. 

Blindpunkte oder -linien sind isolierte Punkte, die in keiner 
Linie mehr auftauchen, beziehungsweise Linien, deren End¬ 
punkte nu 'it mehr vorhanden sind. Das kommt zwar bei sorg¬ 
fältiger Bearbeitung selten vor, ist aber bei grafischen Opera¬ 
tionen störend, da Blindpunkte nach wie vor auswählbar sind. 

Wenn das Fadenkreuz in der Grafik sichtbar ist, kann man 
mit der Taste <M> alle Punkte markieren und erkennt so 
auch Blindpunkte. 

Das Menü DATEN ORDNEN wird mit <X> verlassen. 

Ganz kleine Datensätze werden nicht sortiert. 

DATEN SORTIEREN 

Punkt- und Linientabelle werden nach aufsteigenden 
Punktnummern sortiert. Nach Ausführung des Kommandos 
ist eine vorher gültige Grafik nicht mehr ansprechbar. 
Menüpfad: DATEN/DATEN ORDNEN/DATEN SORTIEREN 

Für die Ausgabe von Konstruktionsdaten auf dem Drucker 
ist es sinnvoll, vorher eine Sortierung vorzunehmen. Auch 
während des Konstruktionsvorgangs bekommt man durch 
eine Sortierung einen besseren Überblick über die bereits 
verwendeten Punktnummern und Linien. Vor dem Sortieren 
sollte man den Datensatz auch komprimieren und Doppel- 
punkte/linien und Blindpunkte/Iinien bearbeiten. 

Die Bearbeitungsdauer großer Datensätze erfordert erheb¬ 
liche Rechenzeit. Das Konstruktionsmodeil wird beim Sortie¬ 
ren in keiner Weise verändert. 

Die Beendigung der Sortierung wird vom Programm mitge¬ 
teilt. 

Nach diesem Befehl kann mit dem Menü AUGEN eine neue 
gültige Grafik der Konstruktion hergestellt werden. 

DATEN SPEICHERN 

Ein vorher erstellter Datensatz kann zwecks Sicherung auf 
Diskette gespeichert werden. 

Menüpfad; DATEN/DATEN SPEICHERN 

Nach der Auswahl des Menüpunktes wird angezeigt, wel¬ 
cher Datensatz zuletzt geladen oder gespeichert worden ist. 
Danach folgt die Aufforderung, einen Namen für den zu 
speichernden Datensatz einzugeben. Wenn lediglich 
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< RETURN > gedrückt wird, verwendet man die Voreinstel¬ 
lung, das heißt den obengenannten Namen. 

Wenn bereits ein Datenfile gleichen Namens auf der Dis¬ 
kette vorhanden ist, wird vor dem Speichern noch gefragt, ob 
man das File überschreiben möchte oder den Vorgang 
abbricht, um eventuell danach einen anderen Namen zu ver¬ 
wenden. 

Falls ein Diskettenfehler auftritt, wird dies gemeldet und 
man kann mit <X> wieder in das übergeordnete Menü 
DATENEINGABE gelangen, in dem man stets auch dann lan¬ 
det, wenn das Kommando fehlerfrei ausgeführt worden ist. 

Das Format, in dem ein Datensatz gespeichert wird, sieht 
folgendermaßen aus: 

Zuerst zwei Variable für die Anzahl der Linien+ 1 und die 
Anzahl der Punkte+1; danach für jede Linie zwei Variable mit 
den Punktnummern der Endpunkte und dann je Konstruk¬ 
tionspunkt vier Variable pro Raumpunkt mit den drei Raum¬ 
koordinaten und anschließend der Punktnummer. Grund¬ 
sätzlich sind alle Variable durch das ASCII-Zeichen 
CHR$(13) (Carriage Return) voneinander getrennt. 

Bei Verwendung einer Datasette ergeben sich praktisch 
keine Unterschiede, wenn man von der Bedienung der 
Datasetten-Tasten absieht. Die Voreinstellung des Speicher¬ 
gerätes erfolgt im Menü DATEN/DATEN AENDERN/SYSTEM 
in der Variable PD. PD=1 ist für die Datasette reserviert, 
PD=8,9,10,11 für Diskettenlaufwerke. 

DIREKTBEFEHLE 

Immer wenn das Fadenkreuz innerhalb eines grafischen 
Kommandos im Bild sichtbar ist, können mit bestimmten 
Tasten direkte Befehle ausgelöst werden, die das anschauli¬ 
che Arbeiten unterstützen. 

<P>: Anzeige der Nummer des nächstgelegenen Bild¬ 
punktes. Durch Überschreiben kann die Nummer geändert 
werden. Mit <X> gelangt man wieder aus der Anzeige her¬ 
aus. 

< V >: Hin- und Herschalten der Fadenkreuzgeschwindig¬ 
keit zwischen einer großen Schrittweite und einer kleinen. Im 
allgemeinen werden grafische Kommandos mit den Vorein¬ 
stellungen 13 und 3 mit der großen Schrittweite gestartet. Mit 
der Taste <V> wird jeweils umgeschaltet. Mit < + > und 
<-> kann die Voreinstellung jeweils in Schriften um eins 
erhöht und vermindert werden. 

< + > Erhöhung der beiden Schrittstufen um 1. 

<-> Erniedrigung der beiden Schrittstufen um 1. 

<M> Markierung aller Bildpunkte durch ein Kreuz. 

< D> direkte Anwahl eines Punktes ohne Fadenkreuzbe¬ 
wegung dorthin. 

Wenn die Punktnummer bekannt ist, kann man damit 
Punkte auswählen, die schwer anzusteuern oder gar nicht im 
Bild sind. Die Auswahl der Nummer erfolgt durch Überschrei¬ 
ben der Zahl und anschließendes < RETURN >. 

<X> Abbrechen der laufenden Operation. 
DISKETTENVERZEICHNIS 

Das Inhaltsverzeichnis einer eingelegten Diskette wird 
angezeigt. Namen und Speicherbedarf aller Files werden 
ausgegeben. 

Menüpfad: DATEN/DISKETTENVERZEICHNIS 

Die Diskette muß vor dem Kommando eingelegt werden. 
Die Gerätenummer wird durch die Variable PD im Menüpunkt 
DATEN/DATEN AENDERN/SYSTEM festgelegt. Bei Dataset- 
tenbetrieb entfällt die Möglichkeit eines Verzeichnisses. Mit 
<X> kann man den Menüpunkt stets verlassen. 

DOPLT 

Mehrere Punkte, die sich an demselben geometrischen Ort 
befinden, aber unterschiedliche Punktnummern haben, wer¬ 
den bis auf einen dieser Punkte gelöscht. Die Konstruktions¬ 
tabellen werden automatisch korrigiert. 

Menüpfad: FORME/PUNKT/DOPLT 

Unter dem Menüpunkt DATEN/DATEN ORDNEN gibt es 



Bild 5. Nochmals der Roboterarm. Wenn sich Punkte über¬ 
lagern, Ist ein exaktes Anpicken nicht möglich. 


eine weitere globale Möglichkeit, Doppelpunkte zu beseiti¬ 
gen. DOPLT ist dagegen für eine Punkhfür-Punkt-Bearbei- 
tung vorgesehen. 

Durch Bewegungen von Teilobjekten, durch Kopieren oder 
direkte Eingabe kann es Vorkommen, daß mehr als ein Punkt 
mit verschiedenen Punktnummern dieselben Raumkoordina¬ 
ten hat. Dann spricht man von einem Doppelpunkt. 

Doppelpunkte führen unter Umständen zu unerwarteten 
Konstruktionsergebnissen. Wenn man zum Beispiel einen 
Doppelpunkt löschen will, wird stets nur einer von mehreren 
Punkten beseitigt mitsamt den Linien, die seine Punktnum¬ 
mer ö* Malten. Auch beim Löschen von Linien kann es pas¬ 
sieren, daß nichts geschieht, weil es die ausgewählte Linie in 
der Tabelle nicht gibt. Dann täuscht die Grafik eine falsche 
Konstruktion vor. Da es zu umständlich ist, vorsichtshalber 
nach jeder Operation eine völlig neue Grafik zu erstellen, ist 
es in diesen Fällen sinnvoll, Doppelpunkte sofort nach ihrer 
Entstehung zu reduzieren. 

Gehören mehrere Punkte zu unterschiedlichen Teilobjek¬ 
ten, die als solche getrennt bearbeitet werden sollen, ist das 
Reduzieren zurückzustellen. Bei Doppelpunkten ist es 
unmöglich, einen bestimmten unter mehreren Punkten mit 
dem Fadenkreuz anzusprechen. Man muß dann auf den 
Direktbefehl <D> ausweichen und die Punktnummer einge¬ 
ben. 

Nach Auswahl von DOPLT bleibt der Menübegriff markiert 
und es erscheint ein Fadenkreuz in der Bildmitte, das mit den 
Cursortasten in alle Richtungen bewegt werden kann. Man 
fährt damit den gewünschten Punkt in der Grafik an und 
drückt auf < RETURN >. Danach erfolgt die Reduzierung. 
Nach Beendigung der Operation erscheint das Fadenkreuz 
und der Menübegriff DOPLT ist nach wie vor ausgewählt. 
Wenn man keinen weiteren Doppelpunkt mehr bearbeiten 
will, gibt man <X> ein. Das Fadenkreuz verschwindet und 
die Menüauswahl zu PUNKT ist wieder eingabebereit. 

Wenn Punkte reduziert werden, die keine Doppelpunkte 
sind, führt die Operation zu keinerlei Fehler im Datensatz, weil 
dann der Löschvorgang unterbleibt. Wenn aber mindestens 
zwei Punkte an demselben geometrischen Ort sind, werden 
alle Doppelgänger gelöscht und die Bezeichnungen in der 
Linientabelle werden auf den verbleibenden Punkt geändert. 
Wenn dabei Doppellinien entstehen, werden diese nicht 
beseitigt. Dazu ist der Menüpunkt FORME/LINIE/LOEPP 
geeignet. 

Die numerische Genauigkeit bei der Entscheidung, ob ein 
Doppelpunkt vorliegt oder nicht, liegt bei 0,002 mm Abstand 
bezogen auf eine Einheit 1 mm. 
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Bild 6. Gehäuseentwurf, der durch entsprechende Bemaßung 
als Vorlage zu einem Modell dienen kann 


Es werden nicht Bildkoordinaten, sondern Raumkoordina¬ 
ten zum Vergleich herangezogen. 

DOPPELPUNKTE/LINIEN 

Sämtliche Doppelpunkte und -linien werden bis auf ein Ele¬ 
ment reduziert. Alle Tabellen werden automatisch bereinigt, 
so daß eine vorher erzeugte Grafik gültig bleibt. 

Menüpfad: DATEN/DATEN ORDNEN/DOPPELPUNKTE/ 
LINIEN 

Durch verschiedene Konstruktionsschritte kann es zur 
Konstruktion von Punkten kommen, die denselben geometri¬ 
schen Ort haben, aber unterschiedliche Punktnummern. 
Wenn keine Trennung dieser Punkte aus konstruktiven Grün¬ 
den erforderlich ist, ist es sicherer, bequemer und platzspa¬ 
rend, wenn diese Punkte auf einen einzigen reduziert wer¬ 
den. Dasselbe gilt für Linien. 

Doppelelemente haben außerdem Nachteile bei der Aus¬ 
wahl von Punkten oder Linien, die zu Konstruktionsfehlern 
führen können. 

Für gezielte Doppelpunktbearbeitung gibt es das Kom¬ 
mando DOPLT. 

DREHG 

Mit diesem grafischen Kommando können ganze Objekte 
oder beliebige Teilobjekte um eine Konstruktionsachse um 
einen beliebigen Winkel gedreht werden. Anstelle der Origi¬ 
nalpunkte können auch kopierte Punkte gedreht werden. 
Menüpfad: BEWEG/DREHG 

Nach der Auswahl von DREHG erscheint das Fadenkreuz 
in der Bildmitte. Der Menüpunkt DREHG bleibt weiterhin mar¬ 
kiert. Mit den Cursortasten kann das Kreuz bewegt werden. 
Mit den Tasten <V>, < + > und <-> kann die Schrittge¬ 
schwindigkeit des Kreuzes beliebig variiert werden, entspre¬ 
chend der Beschreibung der DIREKTBEFEHLE. 

Zuerst wird die Drehachse für die Operation definiert. Dazu 
fährt man zwei vorhandene Konstruktionspunkte an und 
drückt jeweils auf < RETURN >. Als Bestätigung verschwin¬ 
den kurzzeitig Fadenkreuz und Markierung des Menüpunk¬ 
tes DREHG. 

In der Kopfzeile wird nun der Drehwinkel abgefragt. Durch 
Überschreiben der Voreinstellung in allen Richtungen kann 
der gewünschte Winkel im 360-Grad-Maß eingestellt wer¬ 
den. Er darf auch negativ sein, was einen umgekehrten Dreh¬ 
sinn ergibt. Die Richtung der Drehachse zeigt immer vom 
ersten ausgewählten Punkt zum zweiten ausgewählten 
Punkt hin. Wenn man von oben entgegen dieser Richtung auf 
den Achsenvektor schaut, ist der mathematisch positive 
Drehsinn (positive Winkel) gegen den Uhrzeigersinn. Im 
Zweifelsfalle muß man bei falschem Winkelvorzeichen zwei 


Versuche machen. Mit <X> oder dem Wert 0 kann das 
Kommando aber auch folgenlos abgebrochen werden. Mit 

< RETURN > wird der angezeigte Wert als Drehwinkel mit 
Vorzeichen übernommen. 

Danach wird gefragt, ob das noch festzulegende Drehob¬ 
jekt das Original ist (Antwort: <N>) oder ob eine Kopie 
(Antwort: < J >) anzufertigen und zu drehen ist. Da bei einer 
Kopie neue Punkte entstehen, müssen deren Punktnum¬ 
mern vom Benutzer angegeben werden. Um dies zu vereinfa¬ 
chen, wird lediglich ein Wert eingegeben. Dies ist ein Inkre¬ 
mentwert, um den später die Nummern aller ausgewählten 
Originalpunkte erhöht den Kopiepunkten zugewiesen wer¬ 
den. Negative Werte sind erlaubt. Dieses Verfahren erfordert 
eine sinnvolle Numerierung der Konstruktion, wenn man das 
DREHG-Kommando effektiv nutzen möchte. Überschnei¬ 
dungen und andere Unstimmigkeiten in der Numerierung 
sind vom Benutzer selbst zu kontrollieren. Hierbei ist die Ein¬ 
teilung in Punktgruppen zweckmäßig. 

Bei der Auswahl der zu drehenden Konstruktionspunkte 
gibt es zwei Möglichkeiten. Bei der einen Methode gibt man 
auf die Fragen nach Anfangs- und Endpunkt ein Nummern¬ 
intervall ein, aus dem dann alle Punkte bearbeitet werden. Die 
Werte werden einfach in die Kopfzeile eingetragen durch 
Überschreiben der Voreinstellung und mit < RETURN > 
übernommen. Mit <X> oder einem leeren Zahlenintervall 
kann das Kommando abgebrochen werden. Außerdem sind 
nur Werte von 0 bis 9999 zulässig und der Anfangswert muß 
kleiner oder gleich dem Endwert sein. Die numerische Aus¬ 
wahl erfordert wiederum eine sorgfältige Numerierung des 
Objekts. 

Die andere Auswahlmethode erhält man, wenn man als 
Anfangspunkt die Voreinstellung -1 verwendet, also nur 

< RETURN > drückt. Danach erscheint wieder das Faden¬ 
kreuz die Markierung. Man kann nun mit den Cursor¬ 
tasten alle zu drehenden Punkte einzeln anpicken. Beim letz¬ 
ten Punkt muß man anstatt einmal nun zweimal < RETURN > 
eingeben. An der doppelten Auswahl des Punktes erkennt 
das Programm die Absicht des Anwenders. Durch DIREKT¬ 
BEFEHLE wird eine gewisse Hilfe bei der Punktauswahl 
gegeben. Mit <X> kann man jederzeit das Kommando 
abbrechen. 

Danach wird die Drehung ausgeführt und eine neue Grafik 
erstellt. Bei einer Kopie werden automatisch alle inneren 
Linien des ausgewählten Teilobjekts korrekt mitkopiert. Das 
ist der Fall, wenn beide Linienendpunkte ausgewählt sind. 

Die Linienbeziehungen bleiben bei der Drehung bestehen, 
so daß sich Linien nur dann verformen können, wenn nur ein 
Endpunkt der Linie gedreht wird und der andere nicht auf der 
Drehachse liegt. 

Wenn beide Linienendpunkte gedreht werden, dreht sich 
die ganze Linie. 

Das Drehen ist ein seltener gebrauchtes Kommando. 
Runde oder regelmäßige vieleckige Objekte lassen sich 
recht gut durch Drehen konstruieren. Der Drehvektor wird 
stets durch zwei Konstruktionspunkte festgelegt und muß 
daher zum Teil erst selbst konstruiert werden, zum Beispiel 
als Normalenvektor auf einer Ebene. Auch der Drehwinkel 
muß teilweise vor der Operation mit Hilfe von 
BEWEG/MESSW/WINKL erst ermittelt und notiert werden. 

Zum Zweck einer anderen Perspektive sollte man Objekte 
nie selbst drehen, sondern dafür immer mit dem Menü 
AUGEN den Augen- und Blickpunkt verändern. 

Man beachte, daß bei Kopien sogenannte Doppelpunkte 
entstehen können. Das sind Punkte mit unterschiedlicher 
Nummer, die sich aber geometrisch am selben Ort befinden. 
Bei Doppelpunkten besteht leicht die Gefahr von Fehlkon¬ 
struktionen, so daß man diese sofort reduzieren sollte mit den 
Menüpunkten FORME/PUNKT/DOPLT oder aber pauschal 
mit DATEN/DATEN ORDNEN. Nur wenn es konstruktiv sinn- 
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voll ist, daß zwei sich teilweise überlagernde Objekte wegen 
des weiteren Konstruktionsvorgangs bestehen bleiben, 
sollte man nicht reduzieren. Dann lassen sich Doppelpunkte 
notfalls mit DIREKTBEFEHL anpicken. 

FORME 

Menü zu Kommandos, mit denen einzelne Punkte und 
Linien konstruiert oder gelöscht werden können. Dazu gehö¬ 
ren auch Schnittkommandos und die Erzeugung einfacher 
Formen. 

Menüpfad: BEWEG/FORME 

Nach der Auswahl von FORME verschwindet das Menü 
und es erscheint ein neues Menü mit den folgenden Begrif¬ 
fen: 

PUNKT LINE XXXXX SCHNT BIBLI 
Als Voreinstellung wird stets der erste Menüpunkt mar¬ 
kiert. Diese Markierung kann mit der Taste < CRSR > -rechts 
zyklisch verschoben werden, so daß auf BIBLI wieder Menü¬ 
punkt PUNKT folgt. Mit < RETURN > wird eine Auswahl vor¬ 
genommen und mit < X > gelangt man in das übergeordnete 
Menü zurück. 

FORMEN 

Mehrere nichtgrafische Kommandos an Punktgruppen 
sind in diesem Untermenü zusammengefaßt. Dazu gehören 
Löschungen, Kopien, Verschiebungen und Umnumerierun¬ 
gen. 

Menüpfad: DATEN/DATEN AENDERN/FORMEN 
Nach der Auswahl von FORMEN erscheint ein Menü fol¬ 
gender Form: 

FORMEN 

1 PUNKTE VERSCHIEBEN 

2 PUNKTE KOPIEREN 

3 PUNKTE LOESCHEN 

4 PUNKTE UMNUMERIEREN 

5 LINIEN KOPIEREN 

6 LINIEN LOESCHEN 

7 ALLES LOESCHEN 

8 PRISMATISCHE FORM 
X RETURN 

BITTE EINGEBEN 

Durch Eingabe von <X> kommt man in das übergeord¬ 
nete Menü zurück. Ansonsten gelangt man unter den Menü¬ 
punkten 1 bis 8 in bestimmte Gruppenoperationen. 

Bei allen Operationen wird nach den Grenzen eines Punkt¬ 
bereichs gefragt (Anfangs- und Endpunkt). Daten, die keine 
hierfür geeignete Ordnung aufweisen, können nur einzeln 
bearbeitet werden. Grafische Operationen sind vorzuziehen. 
Erst bei größeren Punkt- oder Linienmengen lohnt sich eines 
der obigen Gruppenkommandos. 

Die Operationen können abgebrochen werden, indem man 
den Wert des Endpunktes kleiner wählt als den Wert des 
Anfangspunktes. Man kann aber auch negative Werte oder 
leere Punktintervalle zum Abbruch verwenden. Nach größe¬ 
ren Änderungen lohnt sich ein anschließendes Komprimie¬ 
ren. Nach allen Operationen bis auf das Umnumerieren ist 
eine vorher vorhandene Grafik ungültig und muß unter 
AUGEN erst neu erstellt werden. Mit den Punkten werden 
automatisch auch die Linien umnumeriert. 

GERAD 

Mit diesem grafischen Kommando können ganze Objekte 
oder beliebige Teilobjekte geradlinig längs eines Konstruk¬ 
tionsvektors verschoben werden um einen beliebigen 
Betrag. Anstelle der Originalpunkte können auch kopierte 
Punkte verschoben werden. 

Menüpfad: BEWEG/GERAD 

Nach der Auswahl von GERAD erscheint das Fadenkreuz 
in der Bildmitte. Der Menüpunkt GERAD bleibt weiterhin mar¬ 
kiert. Mit den Cursortasten kann das Kreuz bewegt und mit 
den Tasten <V>, < + > und <-> kann die Schrittge¬ 


schwindigkeit des Kreuzes beliebig variiert werden, entspre¬ 
chend der Beschreibung der DIREKTBEFEHLE. 

Zuerst wird die Verschiebungsrichtung für die Operation 
definiert. Dazu fährt man zwei vorhandene Konstruktions¬ 
punkte an und drückt jeweils auf < RETURN >. Als Bestäti¬ 
gung verschwinden kurzzeitig Fadenkreuz und Markierung 
des Menüpunktes GERAD. In der Kopfzeile wird nun die 
Länge des ausgewählten Verschiebungsvektors als Vorein¬ 
stellung angezeigt. Durch Überschreiben in allen Richtungen 
kann die gewünschte Verschiebungslänge eingestellt wer¬ 
den. Sie darf auch negativ sein, was einer 180-Grad-Drehung 
der Verschiebungsrichtung entspricht. Bei positiver Ver¬ 
schiebung ist die Richtung immer vom ersten ausgewählten 
Punkt zum zweiten ausgewählten Punkt hin. Mit <X> oder 
dem Wert 0 kann das Kommando folgenlos abgebrochen 
werden, mit < RETURN > wird der angezeigte Wert als Ver¬ 
schiebungslänge mit Vorzeichen übernommen. 

Danach wird gefragt, ob das noch festzulegende Verschie¬ 
bungsobjekt das Original ist (Antwort: <N>) oder ob eine 
Kopie (Antwort: <J>) anzufertigen und zu verschieben ist. 
Da bei einer Kopie neue Punkte entstehen, müssen deren 
Punktnummern vom Benutzer angegeben werden. Um dies 
zu vereinfachen, wird lediglich ein Wert eingegeben. Dies ist 
ein Inkrementalwert, um den später die Nummern der Origi¬ 
nalpunkte erhöht den Kopiepunkten zugewiesen werden. 
Negative Werte sind erlaubt. Das Verfahren erfordert eine 
sinnvolle Numerierung, wenn man das GERAD-Kommando 
effektiv nutzen möchte. Überschneidungen und andere 
Unstimmigkeiten in der Numerierung sind vom Benutzer 
selbst zu kontrollieren. Hierbei ist die Einteilung in Punktgrup¬ 
pen zweckmäßig. 

Bei der Auswahl der zu verschiebenden Konstruktions¬ 
punkte gibt es zwei Möglichkeiten. Bei der einen Methode 
gibt auf die Fragen nach Anfangs- und Endpunkt ein 
Nummernintervall ein, aus dem dann alle Punkte bearbeitet 
werden. Die Werte werden einfach in die Kopfzeile eingetra¬ 
gen durch Überschreiben der Voreinstellung und mit 
<RETURN> übernommen. Mit <X> oder einem leeren 
Zahlenintervall kann das Kommando abgebrochen werden. 
Außerdem sind nur Werte von 0 bis 9999 zulässig und der 
Anfangswert muß kleiner gleich dem Endwert sein. Die nume¬ 
rische Auswahl erfordert wiederum eine sorgfältige Numerie¬ 
rung des Objekts. 

Die andere Auswahlmethode erhält man, wenn man als 
Anfangspunkt die Voreinstellung -1 verwendet, also nur 
< RETURN > drückt. Danach erscheint wieder das Faden¬ 
kreuz. Man kann nun mit den Cursortasten und < RETURN > 
alle zu verschiebenden Punkte einzeln anpicken. Beim letz¬ 
ten Punkt muß man anstatt einmal nun zweimal < RETURN > 
eingeben. An der doppelten Auswahl des Punktes erkennt 
das Programm die Absicht des Anwenders. Durch DIREKT¬ 
BEFEHLE wird eine gewisse Hilfe bei der Punktauswahl 
gegeben. Mit <X> kann man jederzeit das Kommando 
abbrechen. Danach wird die Verschiebung ausgeführt und 
eine neue Grafik erstellt. Bei einer Kopie werden automatisch 
alle inneren Linien des ausgewählten Teilobjekts korrekt mit¬ 
kopiert. Das ist der Fall, wenn beide Linienendpunkte ausge¬ 
wählt sind. 

Die Linienbeziehungen bleiben bei der Verschiebung 
bestehen, so daß sich Linien nur dann verformen können, 
wenn nur ein Endpunkt der Linie verschoben wird. 

Wenn beide Linienendpunkte verschoben werden, ver¬ 
schiebt sich die ganze Linie entlang dem Verschiebungsvek¬ 
tor. 

Das Verschieben ist ein viel gebrauchtes Kommando. 

Rechtecke unterschiedlichster Größe lassen sich durch Ver¬ 
schiebungskopie und anschließende Verschiebungen inner¬ 
halb der Kopie aus einem vorgegebenen Rechteck herstei¬ 
len. Der Verschiebungsvektor wird stets durch zwei Kon- 
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Bild 7. Anschauliche Darstellungen sind die Stärken von PED. 
Das gilt selbst für Miniaturobjekte wie diesen Einstellstift. 


struktionspunkte festgelegt und muß meistens erst selbst 
konstruiert werden, etwa als Normalenvektor auf einer 
Ebene. Es gibt unter dem Menüpunkt DATEN/DATEN AEN- 
DERN/FORMEN die Möglichkeit, Verschiebungsvektoren 
auch numerisch einzugeben, jedoch wird hiervon nur in Son¬ 
derfällen Gebrauch gemacht. 

Die Länge des Verschiebungsvektors muß zum Teil vor der 
Operation mit Hilfe von BEWEG/MESSW erst ermittelt und 
notiert werden. 

Zum Zwecke einer anderen Perspektive sollte man Objekte 
nie selbst verschieben, sondern dafür immer mit dem Menü 
AUGEN den Augen- und Blickpunkt verändern. 

Man beachte, daß auch hier wieder Doppelpunkte entste¬ 
hen können. Nur wenn es konstruktiv sinnvoll ist, daß zwei 
sich teilweise überlagernde Objekte wegen des weiteren 
Konstruktionsvorgangs bestehen bleiben, sollte man nicht 
reduzieren. 

Dann lassen sich Doppelpunkte notfalls mit DIREKTBE¬ 
FEHL anpicken. 

HPROF 

Diese Grafikoperation erfordert ein gültiges Bild. 

Objekte oder Teilobjekte können auf eine der drei Haupt¬ 
ebenen orthogonal projiziert werden. 

Menüpfad: FORME/SCHNT/HPROF 

Nach der Auswahl von HPROF muß das Projektionsobjekt 
festgelegt werden. 

Dazu muß der Bereich der Punkte angegeben werden, wel¬ 
che der Projektion unterworfen werden sollen. Dies ist durch 
Bezeichnung von Anfangs- und Endpunkt des Bereichs mög¬ 
lich. Für die numerische Auswahl ist es wichtig, die Punkt¬ 
nummern zu kennen und die Numerierung sorgfältig vorzu¬ 
nehmen. Eine grafische Auswahl mit einem Fadenkreuz ist 
vorläufig noch nicht möglich. Nach der Eingabe wird die Pro¬ 
jektion durchgeführt und eine neue Grafik erstellt. 

Die Projektion kann verhindert werden. Dazu eignen sich 
die Eingabe eines leeren Punktbereichs oder negative 
Werte. 

Die Linienbeziehungen bleiben bei dieser Projektion 
bestehen, so daß sich Linien verformen, wenn nur ein End¬ 
punkt der Linie projiziert wird. 

Das Projizieren ist vor allem für die Erstellung der drei 
Hauptansichten einer Konstruktion geeignet. 


KOPIE 

Hiermit lassen sich perspektivische Bilder auf dem Drucker 
MPS 801 als Hardcopy ausgeben (320*200 Punkte). 
Menüpfad: KOPIE 

Nach der Auswahl verschwindet das Hauptmenü und es 
erscheint eine Abfrage: 

HARDCOPY FORMATE: 

T=TV / M=MPS801 / X=RETURN 

Im Format <T> wird unmittelbar mit der Hardcopy begon¬ 
nen. Da das Verhältnis der Maßstäbe in horizontaler und verti¬ 
kaler Richtung auf dem Datensichtgerät und dem Drucker im 
allgemeinen verschieden ist, ist das gedruckte Bild um etwa 
10% in vertikaler Richtung gestaucht. Dies kann vermieden 
werden durch das Format < M >. Hier wird zuerst auf dem 
Bildschirm ein neues Bild erstellt, welches auf dem Bild¬ 
schirm soweit horizontal gestaucht ist, daß die anschlie¬ 
ßende Hardcopy auf dem Papier korrekte Maßstäbe hat. 
Nach der Darstellung wird zunächst wieder das ursprüngli¬ 
che Bild erzeugt, bevor das Programm in das Hauptmenü 
zurückspringt. 

Die Einstellung korrekter Maßstäbe ist im Menü 
DATEN/DATEN AENDERN/SYSTEM möglich. Die Variable XY 
ist für die Anpassung des Bildschirms an das mathematische 
Modell vorgesehen, die Variable YX für eine normalerweise 
nicht nötige Druckerabstimmung (Verändern Sie bitte nur 
diese Parameter, für alle anderen benötigen Sie weitere 
Systemkenntnisse). Mit <X> kommt man ins Hauptmenü 
zurück. Nach fertiger Hardcopy geschieht das automatisch. 
LAENG 

Messung des wahren Abstandes zweier Punkte. 
Menüpfad: BEWEG/MESSW/LAENG 

Nach der Auswahl von LAENG erscheint das Fadenkreuz. 
Durch Anpicken zweier Punkte wird der Abstand definiert. 
Danach scheint dieser Wert auf dem Bildschirm. 

Wenn ein Fehler auftritt, wird kein Abstand ermittelt, son¬ 
dern direkt in das Menü zurückgesprungen. Als Ursache 
kommt in Frage: ungültiges Bild wegen vorheriger Datenän¬ 
derung oder -Ordnung. 

LINEW 

Grafisches Kommando zur Erzeugung einer Linie in einer 
Ebene durch drei Konstruktionspunkte. Der Anfangspunkt 
der Linie liegt in einem der drei Konstruktionspunkte. Die 
Richtung der Linie wird über einen Winkel definiert. 
Menüpfad: FORME/LINIE/LINEW 

Nach der Auswahl von LINEW erscheint ein Fadenkreuz in 
der Bildschirmmitte und der Menüpunkt bleibt markiert. Mit 
den Cursortasten kann das Fadenkreuz in alle Richtungen 
bewegt werden. Mit den Tasten <V>, < + > und <-> kann 
die Schrittgeschwindigkeit des Fadenkreuzes variiert wer¬ 
den. <V> bewirkt ein Hin- und Herschalten zwischen einer 
großen und einer kleinen Schrittweite, die auf 13 beziehungs¬ 
weise 3 voreingestellt sind. Mit < + > und <-> kann man 
beide Werte gemeinsam jeweils um 1 erhöhen oder vermin¬ 
dern. 

Man fährt mit dem Kreuz drei vorhandene Konstruktions¬ 
punkte an und drückt jeweils auf < RETURN >. Der erste 
Punkt ist dabei der Anfangspunkt der neuen Linie und 
bestimmt mit den beiden anderen zusammen die Ebene, in 
der die Linie liegt. 

Der erste und zweite Punkt definieren in der Ebene eine 
Richtung, zu der die neue Linie einen einzugebenden Winkel 
hat. Länge und Winkel der neuen Linie können unter 
BEWEG/MESSW ermittelt werden oder sind konstruktiv 
bekannt. Notfalls ist eine Hilfskonstruktion erforderlich. 

Die Länge der Linie wird in der Kopfleiste abgefragt. Als 
Voreinstellung dient der Abstand der beiden ersten ausge¬ 
wählten Konstruktionspunkte. Der Wert kann beliebig über¬ 
schrieben werden und wird mit < RETURN > übernommen. 

Der Winkel wird von der Bezugslinie in Richtung der Linie 
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von Punkt zwei nach Punkt drei positiv genommen. Notfalls 
braucht man zwei Versuche hinsichtlich der richtigen Vorzei¬ 
chenwahl. Der Wert wird im 360-Grad-Maß eingegeben und 
darf auch negativ sein. Er wird auch erst mit < RETURN > 
übernommen. 

Danach wird der Endpunkt der neuen Linie als neuer Kon¬ 
struktionspunkt berechnet. Bevor dieser Punkt und die Linie 
in die Konstruktion übernommen werden können, muß für 
den Punkt eine Nummer eingegeben werden. Das Programm 
fragt die Punktnummer ab. Das Eingabefeld in der Kopfzeile 
des Bildschirms kann beliebig beschrieben werden. 

Beim Anpicken der Punkte wird stets der Raumpunkt aus¬ 
gewählt, dessen Bildpunkt dem Fadenkreuz am nächsten ist. 
Bei einfachen Konstruktionen braucht man es daher nicht so 
genau zu nehmen. Bei komplexen Modellen dagegen muß 
man sorgfältig Vorgehen und notfalls auch mal eine Aus¬ 
schnittsvergrößerung mit dem Menü AUGEN erzeugen oder 
auf DIREKTBEFEHLE zurückgreifen. Besondere Vorsicht ist 
auch bei Doppelpunkten geboten (siehe DOPLT). Während 
LINEW stehen alle DIREKTBEFEHLE zur Verfügung. 

Nach Beendigung der Eingabe wird die Linie in der Kon¬ 
struktion mit dargestellt und das Programm geht in das über¬ 
geordnete Menü zurück. LINEW kann zu jeder Zeit mit < X > 
ohne Folgen für die Konstruktion abgebrochen werden. 
Punktnummern dürfen nur zwischen 0 und 9999 liegen. 
Bereits vergebene Nummern werden vom Programm nicht 
angenommen und mit einer Fehlermeldung kommentiert. 

Falls drei Punkte ausgewählt werden, die keine Ebene 
bestimmen, wird das Kommando ebenfalls abgebrochen. 
Dasselbe geschieht bei der Linienlänge 0 und dem Winkel 0. 
Wenn das Kommando einmal nicht die gewünschte Wirkung 
zeigt, vergewissere man sich, wie das Modell tatsächlich auf¬ 
gebaut ist (DATEN/DATEN AENDERN), da gelegentlich DOP¬ 
PELPUNKTE oder BLINDPUNKTE nicht bedacht werden. 
LINIE 

Menü zu Kommandos, mit denen einzelne Linien konstru¬ 
iert oder gelöscht werden können. 

Menüpfad: FORME/LINIE 

Nach der Auswahl von LINIE verschwindet das Menü und 
es erscheint ein neues Menü mit den folgenden Begriffen: 
ZUSPP LOEPP LINPP LINEW NORMA 

Als Voreinstellung wird stets der erste Menüpunkt mar¬ 
kiert. Diese Markierung kann mit der Taste < CRSR > -rechts 
zyklisch verschoben werden, so daß auf NORMA wieder 
Menüpunkt ZUSPP folgt. Mit < RETURN > wird eine Aus¬ 
wahl vorgenommen und mit <X> gelangt man in das über¬ 
geordnete Menü zurück. 

LINIEN 

Numerische Anzeige und Veränderung der Linientabelle 
des Konstruktionsmodells. 

Menüpfad: DATEN/DATEN AENDERN/LINIEN 

Nach der Auswahl des Menüpunktes werden die ersten 40 
Plätze der Linientabelle angezeigt. Zwei benachbarte Num¬ 
mern bilden eine Linie. Die rechte Doppelspalte kommt in der 
Reihenfolge der Tabelle nach der linken Doppelspalte. Dies 
ist für die Größe des Datensatzes wichtig. Es wird Platz für 
maximal 360 Linien angeboten. Für bestimmte grafische 
Operationen wird aber ein Teil des Linienspeichers für andere 
Zwecke verwendet. 

Mit den <-und >-Tasten kann man in der Tabelle seiten¬ 
weise um 40 Plätze zurück- oder vorwärtsblättern. Mit 
<HOME> wird der nicht blinkende Cursor auf die erste 
Schreibstelle der Seite gesetzt, mit < RETURN > auf die 
nächstfolgende. Mit den Cursortasten kann der Cursor 
außerdem In alle Richtungen über den Bildschirm bewegt 
werden. 

Die auf dem Bildschirm angezeigten Werte sind stets gül¬ 
tig. Dadurch ist die Eingabe ein einfaches Überschreiben der 
vorgegebenen Werte. Lediglich unbrauchbare Daten wie 


Textzeichen oder Zahlen oberhalb 9999, unterhalb -1 und 
gebrochene Zahlen führen zu automatischen Korrekturen 
nach Verlassen der Tabellenseite. Der Wert -1 in der Tabelle 
zeigt an, daß in diesem Tabellenplatz keine Linie eingetragen 
ist. Der andere Wert, der für den anderen Endpunkt vorgese¬ 
hen ist, spielt dann keine Rolle. 

Mit <X> kann man den Menüpunkt LINIEN verlassen. 
Falls Änderungen in der Linientabelle vorgenommen worden 
sind, wird eine vorher erzeugte Grafik ungültig und muß mit 
dem Menü AUGEN neu erstellt werden. 

Für das Schreiben in der Tabelle sind bestimmte Felder fest 
vorgegeben. Beim Verlassen eines Schreibfeldes springt der 
Cursor stets auf die erste Stelle des nächsten Schreibfeldes. 
LINIEN KOPIEREN 

Numerisches Kommando zum Kopieren einer Linien¬ 
gruppe. Die Kopie erhält eine neue gegenüber der alten ver¬ 
schobene Numerierung. Nach Ausführung des Kommandos 
ist eine vorher gültige Grafik nicht mehr ansprechbar. 
Menüpfad: DATEN/DATEN AENDERN/FORMEN/LINIEN 
KOPIEREN 

Nach der Auswahl des Menüpunkts muß der zu bearbei¬ 
tende Punktbereich eingegeben werden. Dazu gibt man eine 
Nummer für den Anfangs- und den Endpunkt ein. Die Einga¬ 
ben werden mit < RETURN > übernommen. Alle Punkte mit 
Nummern in dem vorher bestimmten Punktintervall werden 
bearbeitet. 

Es sind nur Punktnummern von 0 bis 9999 zulässig. Leere 
Punktintervalle und unzulässige Grenzen führen zum 
Abbruch des Kommandos. 

Die neu entstehenden Konstruktionslinien werden ent¬ 
sprechend dem Original numeriert. Dazu wird auf Anforde¬ 
rung ein Punktinkrement eingegeben. Um diesen Wert sind 
die Punktnummern in den neuen Linien größer oder kleiner 
als di* ' lummem im Original. Hierbei ist auf Überschneidun¬ 
gen bei der Numerierung zu achten, da das Programm keine 
Überprüfung vornimmt. Die entstehenden Linien sind zu¬ 
nächst einmal Blindlinien, da keine Punkte mitkopiert werden. 

Linien, von denen nur ein Endpunkt ausgewählt wurde, 
werden bei der Operation nicht berücksichtigt. 

Nach numerischen Befehlen kann mit dem Menü AUGEN 
eine neue gültige Grafik der Konstruktion hergestellt werden. 
LINIEN LOESCHEN 

Numerisches Kommando zum Löschen einer Linien¬ 
gruppe. Nach Ausführung des Kommandos ist eine vorher 
gültige Grafik nicht mehr ansprechbar. 

Menüpfad: DATEN/DATEN AENDERN/FORMEN/LINIEN 
LOESCHEN 

Nach der Auswahl des Menüpunktes muß der zu bearbei¬ 
tende Punktbereich eingegeben werden. Dazu gibt man eine 
Nummer für den Anfangs- und den Endpunkt ein. Die Einga¬ 
ben werden mit < RETURN > übernommen. Alle Linien mit 
Endpunkten, deren Nummern beide in dem vorher bestimm¬ 
ten Punktintervall liegen, werden bearbeitet. 

Es sind nur Punktnummern von 0 bis 9999 zulässig. Leere 
Punktintervalle und unzulässige Grenzen führen zum 
Abbruch des Kommandos. Linien, von denen nur ein End¬ 
punkt ausgewählt wurde, werden nicht berücksichtigt. Nach 
numerischen Befehlen kann mit dem Menü AUGEN eine 
neue gültige Grafik der Konstruktion hergestellt werden. 
LINPP 

Graf isches Kommando zur Verlängerung oder Teilung einer 
Konstruktionslinie durch zwei Punkte. Die Richtung wird 
durch die Reihenfolge der Auswahl und durch den Eingabe¬ 
wert bestimmt. 

Menüpfad: FORME/LINIE/LINPP 

Nach der Auswahl von LINPP erscheint ein Fadenkreuz in 
der Bildschirmmitte und der Menüpunkt bleibt markiert. Mit 
den Cursortasten läßt sich das Fadenkreuz in alle Richtungen 
bewegen. Mit den Tasten <V>, < + > und <-> kann die 
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Schrittgeschwindigkeit des Fadenkreuzes variiert werden. 
<V> bewirkt ein Hin- und Herschalten zwischen einer gro¬ 
ßen und einer kleinen Schrittweite, die auf 13 beziehungs¬ 
weise 3 voreingestellt sind. Mit < + > und < - > kann man 
beide Werte gemeinsam jeweils um 1 erhöhen oder vermin¬ 
dern. 

Man fährt mit dem Kreuz zwei vorhandene Konstruktions¬ 
punkte an und drückt jeweils auf < RETURN >. Der erste 
Punkt ist dabei der Bezugspunkt für die Länge der neuen 
Linie und bestimmt mit dem anderen zusammen die Richtung. 

Die Länge der neuen Linie kann eingegeben oder vorher 
unter BEWEG/MESSW durch Messung ermittelt werden. 
Notfalls ist eine Hilfskonstruktion erforderlich. 

Die Länge der Linie wird in der Kopfleiste abgefragt. Als 
Voreinstellung dient der Abstand der beiden ausgewählten 
Konstruktionspunkte. Der Wert kann beliebig überschrieben 
werden und wird mit < RETURN > übernommen. 

Je nach Eingabewert läuft die folgende Konstruktion ab. 
Bei einer Länge 0 wird das Kommando abgebrochen. Bei 
negativem Wert wird an den Bezugspunkt eine neue Kon¬ 
struktionslinie mit der angegebenen Länge (absolut) entge¬ 
gen der Richtung von Punkt 1 nach Punkt 2 erzeugt. Bei 
einem Wert zwischen 0 und der Voreinstellung wird die vor¬ 
handene Linie in zwei Linien geteilt, wobei die Position ab 
Bezugspunkt (Punkt 1) bestimmt wird. Bei einem Wert, der 
größer als die Voreinstellung ist, wird die Linie über Punkt 2 
hinaus um den Differenzbetrag verlängert. Dabei entsteht für 
das überstehende Stück eine neue Konstruktionslinie. 

Nach der Eingabe wird der neue Konstruktionspunkt 
berechnet. Bevor dieser Punkt und die neue Linie in die Kon¬ 
struktion übernommen werden können, muß für den Punkt 
eine Nummer eingegeben werden. Das Programm fragt die 
Punktnummer ab. Das Eingabefeld in der Kopfzeile des 
Bildschirms kann beliebig beschrieben werden. Mit 
< RETURN > wird der angezeigte Wert übernommen. 

Beim Anpicken der Punkte wird stets der Raumpunkt aus¬ 
gewählt, dessen Biidpunkt dem Fadenkreuz am nächsten ist. 
Bei einfachen Konstruktionen braucht man es daher nicht so 
genau zu nehmen. Bei komplexen Modellen dagegen muß 
man sorgfältig Vorgehen und notfalls auch mal eine Aus¬ 
schnittsvergrößerung mit dem Menü AUGEN erzeugen oder 
auf DIREKTBEFEHLE zurückgreifen. Besondere Vorsicht ist 
auch bei Doppelpunkten geboten (siehe DOPLT). Während 
LINPP stehen alle DIREKTBEFEHLE zur Verfügung. 

Nach Beendigung der Eingabe wird die Linie in der Kon¬ 
struktion mit dargestellt und das Programm geht in das über¬ 
geordnete Menü zurück. LINPP kann zu jeder Zeit mit < X > 



Bild 8. Die vom Haus verdeckten Linien sind manuell entfernt 
worden. So entsteht ein optimaler Eindruck. 


ohne Folgen für die Konstruktion abgebrochen werden. 
Punktnummern dürfen nur zwischen 0 und 9999 liegen. 
Bereits vergebene Nummern werden vom Programm nicht 
angenommen und mit einer Fehlermeldung kommentiert. 

Falls zwei Punkte ausgewählt werden, die keine Gerade 
bestimmen, wird das Kommando ebenfalls abgebrochen. 
Dasselbe geschieht bei der Linienlänge 0. Wenn das Kom¬ 
mando einmal nicht die gewünschte Wirkung zeigt, vergewis¬ 
sere man sich, wie das Modell tatsächlich aufgebaut ist 
(DATEN/DATEN AENDERN), da gelegentlich DOPPEL¬ 
PUNKTE oder BLINDPUNKTE nicht bedacht werden. 

LINZP 

Grafisches Kommando zur Einbindung eines 
Konstruktionspunktes in eine bestehende Konstruktionsli¬ 
nie. Der Punkt muß nicht auf der Linie liegen. Die bestehende 
Linie wird in zwei Linien mit dem neuen Zwischenpunkt zer¬ 
legt. 

Menüpfad: FORME/PUNKT/LINZP 

Nach der Auswahl von LINZP erscheint ein Fadenkreuz in 
der Bildschirmmitte und der Menüpunkt bleibt markiert. Mit 
den Cursortasten kann das Fadenkreuz in alle Richtungen 
bewegt werden. Mit den Tasten <V>, < + > und <-> kann 
die Schrittgeschwindigkeit des Fadenkreuzes variiert wer¬ 
den. <V> bewirkt ein Hin- und Herschalten zwischen einer 
großen und einer kleinen Schrittweite, die auf 13 beziehungs¬ 
weise 3 voreingestellt sind. Mit < + > und < - > kann man 
beide Werte gemeinsam jeweils um 1 erhöhen oder vermin¬ 
dern. 

Man fährt mit dem Kreuz drei vorhandene Konstruktions¬ 
punkte an und drückt jeweils auf < RETURN >. Der erste und 
dritte Punkt bestimmen die zu teilende Linie. Falls diese Linie 
nicht besteht, wird nach der Auswahl der drei Punkte das 
Kommando abgebrochen. Der zweite ausgewählte Punkt ist 
derTeiiüi .gspunkt für die alte Linie. Wenn er nicht auf der alten 
Linie liegt, werden trotzdem aus der einen zwei Linien 
gemacht mit Punkt 2 als gemeinsamem Punkt. 

Beim Anpicken der Punkte wird stets der Raumpunkt aus¬ 
gewählt, dessen Bildpunkt dem Fadenkreuz am nächsten ist. 
Bei einfachen Konstruktionen braucht man es daher nicht so 
genau zu nehmen. Bei komplexen Modellen dagegen muß 
man sorgfältig Vorgehen und notfalls auch mal eine Aus¬ 
schnittsvergrößerung mit dem Menü AUGEN erzeugen oder 
auf DIREKTBEFEHLE zurückgreifen. Besondere Vorsicht ist 
auch bei Doppelpunkten geboten (siehe DOPLT). Während 
LINZP stehen alle DIREKTBEFEHLE zur Verfügung. 

Nach Beendigung der Eingabe wird die alte Linie gelöscht 
und die beiden neuen Linien werden in die Konstruktionsgra¬ 
fik eingefügt. Das Programm geht in das übergeordnete 
Menü zurück. LINZP kann zu jeder Zeit mit <X> ohne Fol¬ 
gen für die Konstruktion abgebrochen werden. 

Falls zwei Punkte ausgewählt werden, die keine Gerade 
bestimmen, wird das Kommando abgebrochen. Wenn das 
Kommando einmal nicht die gewünschte Wirkung zeigt, ver¬ 
gewissere man sich, wie das Modell tatsächlich aufgebaut ist 
(DATEN/DATEN AENDERN), da gelegentlich DOPPEL¬ 
PUNKTE oder BLINDPUNKTE nicht bedacht werden. 

LOEPP 

Grafisches Kommando zum Löschen einer Konstruktionsli¬ 
nie zwischen zwei Konstruktionspunkten. Die Operation 
erfordert eine gültige Grafik. 

Menüpfad: FORME/LINIE/LOEPP 

Nach der Auswahl von LOEPP erscheint ein Fadenkreuz in 
der Bildschirmmitte und der Menüpunkt bleibt markiert. Mit 
den Cursortasten kann das Fadenkreuz in alle Richtungen 
bewegt werden. Mit den Tasten <V>, < + > und <-> kann 
die Schrittgeschwindigkeit des Fadenkreuzes variiert wer¬ 
den. <V > bewirkt ein Hin- und Herschalten zwischen einer 
großen und einer kleinen Schrittweite, die auf 13 beziehungs- 



96 


SONDERHEFT 14 


























C16 + 64 KByte, Plus/4 


GRAFIK-LISTING 


weise 3 voreingestellt sind. Mit < + > und <-> kann man 
beide Werte gemeinsam jeweils um 1 erhöhen oder vermin¬ 
dern. 

Man fährt mit dem Kreuz zwei schon vorhandene Konstruk¬ 
tionspunkte an und drückt jeweils auf < RETURN >. Danach 
wird eine vorhandene Verbindungslinie gelöscht (Bild 8). 
Doppellinien werden vollständig beseitigt. Durch numerische 
Ungenauigkeiten kann es Vorkommen, daß die Löschung auf 
dem Schirm nicht total ist. Das Konstruktionsmodell ist trotz¬ 
dem korrekt. Man kann notfalls unter AUGEN ein völlig kor¬ 
rektes Bild neu erstellen. Beim Anpicken der Punkte wird 
stets der Raumpunkt ausgewählt, dessen Bildpunkt dem 
Fadenkreuz am nächsten ist. Bei einfachen Konstruktionen 
braucht man es daher nicht so genau zu nehmen. Bei komple¬ 
xen Modellen dagegen muß man sorgfältig Vorgehen und not¬ 
falls auch mal eine Ausschnittsvergrößerung mit dem Menü 
AUGEN erzeugen oder auf DIREKTBEFEHLE zurückgreifen. 
Besondere Vorsicht ist auch bei Doppelpunkten geboten 
(siehe DOPLT). Während LOEPP stehen alle DIREKTBE¬ 
FEHLE zur Verfügung. 

Nach dem Löschen der Linie erscheint wieder das Faden¬ 
kreuz in der Bildmitte und das Kommando ZUSPP bleibt akti¬ 
viert. Verlassen kann man LOEPP zu jeder Zeit mit der Taste 
<X> ohne irgendwelche Folgen für die Konstruktion. 

Falls zwei Punkte ausgewählt werden, zwischen denen 
keine Linie vorhanden ist, wird auch an der Konstruktion 
nichts verändert. Wenn das Kommando also einmal nicht die 
gewünschte Wirkung zeigt, vergewissere man sich, wie das 
Modell tatsächlich aufgebaut ist (DATEN/DATEN AENDERN), 
da gelegentlich DOPPELPUNKTE oder BLINDPUNKTE nicht 
bedacht werden. 

LOESC 

Grafisches Kommando zum Löschen eines Konstruktions¬ 
punktes und aller mit diesem Punkt verbundenen Konstruk- 
tionslinien. Die Operation erfordert eine gültige Grafik. 
Menüpfad: FORME/PUNKT/LOESC 

Nach der Auswahl von LOESC erscheint ein Fadenkreuz in 
der Bildschirmmitte und der Menüpunkt bleibt markiert. Die 
Bewegung des Fadenkreuzes erfolgt wie üblich mit den 
Cursortasten und mit <V>, < + > und <->. Man fährt mit 
dem Kreuz einen vorhandenen Konstruktionspunkt an und 
drückt auf < RETURN >. Danach werden alle zu diesem 
Punkt vorhandenen Verbindungslinien und der Punkt im 
Modell und auf dem Bildschirm gelöscht. Doppellinien zu 
dem Punkt werden beseitigt. Wenn der Punkt allerdings ein 
Doppelpunkt ist, wird dies bei der Operation völlig außer Acht 
gelassen. Durch numerische Ungenauigkeiten kann es Vor¬ 
kommen, daß die Löschung der Linien auf dem Schirm nicht 
total ist. Das Konstruktionsmodell ist trotzdem korrekt geän¬ 
dert. Man kann notfalls unter AUGEN ein sauberes neues Bild 
erstellen. Beim Anpicken der Punkte wird stets der Raum¬ 
punkt ausgewählt, dessen Bildpunkt dem Fadenkreuz am 
nächsten ist. Bei einfachen Konstruktionen braucht man es 
daher nicht so genau zu nehmen. Bei komplexen Modellen 
dagegen muß man sorgfältig Vorgehen und notfalls auch mal 
eine Ausschnittsvergrößerung mit dem Menü AUGEN erzeu¬ 
gen oder auf DIREKTBEFEHLE zurückgreifen. Besondere 
Vorsicht ist auch bei Doppelpunkten geboten (siehe DOPLT). 
Während LOESC stehen alle DIREKTBEFEHLE zur Verfü¬ 
gung. 

Nach dem Löschen der Linien erscheint wieder das Faden¬ 
kreuz in der Bildmitte und das Kommando LOESC bleibt akti¬ 
viert. Verlassen kann man LOESC zu jeder Zeit mit der Taste 
<X> ohne irgendwelche Folgen für die Konstruktion. 

Falls ein Doppelpunkt oder Blindpunkt ausgewählt wird, 
kann es Vorkommen, daß die gewünschte Wirkung ausbleibt. 
Man überprüfe dann, wie das Modell tatsächlich aufgebaut ist 
(DATEN/DATEN AENDERN), da gelegentlich DOPPEL¬ 
PUNKTE oder BLINDPUNKTE nicht bedacht werden. 


LOTEB 

Grafisches Kommando zum Erzeugen einer Lotlinie von 
einem Konstruktionspunkt auf eine Ebene durch drei Kon¬ 
struktionspunkte. 

Menüpfad: FORME/PUNKT/LOTEB 

Nach der Auswahl von LOTEB erscheint ein Fadenkreuz in 
der Bildschirmmitte und der Menüpunkt bleibt markiert. Die 
Bewegung des Fadenkreuzes erfolgt wie üblich mit den 
Cursortasten und mit <V>, < + > und <->. Man fährt mit 
dem Kreuz vier vorhandene Konstruktionspunkte an und 
drückt jeweils auf < RETURN >. Der erste Punkt ist dabei der 
Anfangspunkt des Lots und die drei folgenden definieren die 
Ebene, auf die das Lot gefällt wird. 

Danach wird der Fußpunkt des Lots als neuer Konstruk¬ 
tionspunkt berechnet. Bevor dieser Punkt und die Lotlinie in 
die Konstruktion übernommen werden können, muß für den 
Punkt eine Nummer eingegeben werden. Das Programm 
fragt die Punktnummer ab. Das Eingabefeld in der Kopfzeile 
kann beliebig beschrieben werden. Mit < RETURN > wird 
der angezeigte Wert übernommen. 

Beim Anpicken der Punkte wird stets der Raumpunkt aus¬ 
gewählt, dessen Bildpunkt dem Fadenkreuz am nächsten ist. 
Bei einfachen Konstruktionen braucht man es daher nicht so 
genau zu nehmen. Bei komplexen Modellen dagegen muß 
man sorgfältig Vorgehen und notfalls auch mal eine Aus¬ 
schnittsvergrößerung mit dem Menü AUGEN erzeugen oder 
auf DIREKTBEFEHLE zurückgreifen. Besondere Vorsicht ist 
auch bei Doppelpunkten geboten (siehe DOPLT). Während 
LOTEB stehen alle DIREKTBEFEHLE zur Verfügung. 

Nach Beendigung der Eingabe wird die Lotlinie in der Kon¬ 
struktion mit dargestellt und das Programm geht in das über¬ 
geordnete Menü zurück. LOTEB kann zu jeder Zeit mit < X > 
ohne Folgen für die Konstruktion abgebrochen werden. 
PunlW mmern dürfen nur zwischen 0 und 9999 liegen. 
Bereits vergebene Nummern werden vom Programm nicht 
angenommen und mit einer Fehlermeldung kommentiert. 

Falls drei Punkte ausgewählt werden, die keine Ebene bil¬ 
den, wird das Kommando ebenfalls abgebrochen. Wenn das 
Kommando einmal nicht die gewünschte Wirkung zeigt, ver¬ 
gewissere man sich, wie das Modell tatsächlich aufgebaut ist 
(DATEN/DATEN AENDERN), da gelegentlich DOPPEL¬ 
PUNKTE oder BLINDPUNKTE nicht bedacht werden. 
LOTGR 

Grafisches Kommando zum Erzeugen einer Lotlinie von 
einem Konstruktionspunkt auf eine Gerade durch zwei Kon¬ 
struktionspunkte. 

Menüpfad: FORME/PUNKT/LOTGR 

Nach der Auswahl von LOTGR erscheint ein Fadenkreuz in 
der Bildschirmmitte und der Menüpunkt bleibt markiert. Die 
Bewegung des Fadenkreuzes erfolgt wie üblich mit den 
Cursortasten undmit<V>, < + > und <->. Man fährt mit 
dem Kreuz drei vorhandene Konstruktionspunkte an und 
drückt jeweils auf < RETURN >. Der erste Punkt ist dabei der 
Anfangspunkt des Lots und die beiden folgenden definieren 
die Gerade, zu der das Lot genommen wird. 

Danach wird der Fußpunkt des Lots als neuer Konstruk¬ 
tionspunkt berechnet. Bevor dieser Punkt und die Lotlinie in 
die Konstruktion übernommen werden können, muß für den 
Punkt eine Nummer eingegeben werden. Das Programm 
fragt die Punktnummer ab. Das Eingabefeld in der Kopfzeile 
des Bildschirms kann beliebig beschrieben werden. Mit 
< RETURN > wird der angezeigte Wert übernommen. 

Beim Anpicken der Punkte wird stets der Raumpunkt aus¬ 
gewählt, dessen Bildpunkt dem Fadenkreuz am nächsten ist. 
Bei einfachen Konstruktionen braucht man es daher nicht so 
genau zu nehmen. Bei komplexen Modellen dagegen muß 
man sorgfältig Vorgehen und notfalls auch mal eine Aus¬ 
schnittsvergrößerung mit dem Menü AUGEN erzeugen oder 
auf DIREKTBEFEHLE zurückgreifen. Besondere Vorsicht ist 
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GRAFIK-LISTING 


C16 + 64 KByte, Plus/4 


auch bei Doppelpunkten geboten (siehe DOPLT). Während 
LOTGR stehen alle DIREKTBEFEHLE zur Verfügung. 

Nach Beendigung der Eingabe wird die Lotlinie in der Kon¬ 
struktion mit dargestellt und das Programm geht in das über¬ 
geordnete Menü zurück. LOTGR kann zu jeder Zeit mit < X > 
ohne Folgen für die Konstruktion abgebrochen werden. 
Punktnummern dürfen nur zwischen 0 und 9999 liegen. 
Negative Werte führen zum Abbruch und bereits vergebene 
Nummern zu einer Fehlermeldung mit erneuter Eingabeauf¬ 
forderung. 

Falls zwei Punkte ausgewählt werden, die keine Gerade bil¬ 
den, wird das Kommando ebenfalls abgebrochen. Wenn das 
Kommando einmal nicht die gewünschte Wirkung zeigt, ver¬ 
gewissere man sich, wie das Modell tatsächlich aufgebaut ist 
(DATEN/DATEN AENDERN), da gelegentlich DOPPEL¬ 
PUNKTE oder BLINDPUNKTE nicht bedacht werden. 
MASTB 

Mit diesem grafischen Kommando können ganze Objekte 
oder beliebige Teilobjekte, maßstäblich bezogen auf einen 
festen Konstruktionspunkt, um einen beliebigen Faktor ver¬ 
kleinert oder vergrößert werden. Anstelle der Originalpunkte 
lassen sich auch kopierte Punkte bearbeiten. 

Menüpfad: BEWEG/MASTB 

Nach der Auswahl von MASTB erscheint das Fadenkreuz 
in der Bildmitte. Der Menüpunkt MASTB bleibt weiterhin mar¬ 
kiert. Die Bewegung des Fadenkreuzes erfolgt mit den Cur¬ 
sortasten und mit <V>, < + > und <->. 

Zuerst wird der Festpunkt für die Operation definiert. Dazu 
fährt man einen vorhandene Konstruktionspunkte an und 
drückt auf < RETURN >. 

In der Kopfzeile wird nun der Maßstabsfaktor abgefragt. 
Durch Überschreiben der Voreinstellung in allen Richtungen 
kann der gewünschte Wert eingestellt werden. Er sollj;e. posi¬ 
tiv sein und größer als 0,001. 

Mit < X > oder dem Wert 1 kann das Kommando folgenlos 
abgebrochen werden, mit < RETURN > wird der angezeigte 
Wert als Maßfaktor mit Vorzeichen übernommen. 

Danach wird gefragt, ob das noch festzulegende Bearbei¬ 
tungsobjekt das Original ist (Antwort: <N>) oder ob eine 
Kopie (Antwort: < J >) anzufertigen und zu bearbeiten ist. Da 
bei einer Kopie neue Punkte entstehen, müssen deren 
Punktnummern vom Benutzer angegeben werden. Um dies 
zu vereinfachen, wird lediglich ein Wert eingegeben. Dies ist 
ein Inkrementwert, um den später die Nummern der Original¬ 
punkte erhöht den Kopiepunkten zugewiesen werden. 
Negative Werte sind erlaubt. Dieses Verfahren erfordert eine 
sinnvolle Numerierung, wenn man das MASTB-Kommando 
effektiv nutzen möchte. Überschneidungen und andere 
Unstimmigkeiten in der Numerierung sind vom Benutzer 
selbst zu kontrollieren. Hierbei ist die Einteilung in Punktgrup¬ 
pen zweckmäßig. 

Bei der Auswahl der zu verschiebenden Konstruktions¬ 
punkte gibt es zwei Möglichkeiten. Bei der einen Methode 
gibt man auf die Fragen nach Anfangs- und Endpunkt ein 
Nummernintervall ein, aus dem dann alle Punkte bearbeitet 
werden. Die Werte werden einfach in die Kopfzeile eingetra¬ 
gen • durch Überschreiben der Voreinstellung und mit 
<RETURN> übernommen. Mit <X> oder einem leeren 
Zahlenintervall kann das Kommando abgebrochen werden. 
Außerdem sind nur Werte von 0 bis 9999 zulässig und der 
Anfangswert muß kleiner gleich dem Endwert sein. Die nume¬ 
rische Auswahl erfordert wiederum eine sorgfältige Numerie¬ 
rung des Objekts. 

Die andere Auswahlmethode erhält man, wenn man als 
Anfangspunkt die Voreinstellung -1 verwendet, also nur 
< RETURN > drückt. Danach erscheint wieder das Faden¬ 
kreuz. Man kann nun mit den Cursortasten und < RETURN > 
alle zu bearbeitenden Punkte einzeln anpicken. Beim letzten 
Punkt muß man anstatt einmal nun zweimal < RETURN > ein¬ 


geben. An der doppelten Auswahl des Punktes erkennt das 
Programm die Absicht des Anwenders. Durch DIREKTBE¬ 
FEHLE wird eine gewisse Hilfe bei der Punktauswahl gege¬ 
ben. 

Danach wird die Verkleinerung oder Vergrößerung ausge¬ 
führt und eine neue Grafik erstellt. Bei einer Kopie werden 
automatisch alle inneren Linien des ausgewählten Teilobjekts 
korrekt mitkopiert. Das ist der Fall, wenn beide Linienend¬ 
punkte ausgewählt sind. 

Die Linienbeziehungen bleiben bei der Verschiebung 
bestehen, so daß sich Linien nur dann unkontrolliert verfor¬ 
men können, wenn nur ein Endpunkt der Linie bearbeitet 
wird. 

Wenn beide Linienendpunkte bearbeitet werden, vergrö¬ 
ßert oder verkleinert sich die ganze Linie bezogen auf den 
Festpunkt. 

Das maßstäbliche Verschieben mit einem Festpunkt ist ein 
selten gebrauchtes Kommando. Formen unterschiedlichster 
Größe, aber ähnlicher Gestalt, lassen sich durch Verschie- 




Blld 10. Kleine Änderungen verdeutlichen den Eindruck 



Bild 11. Störende Linien wurden entfernt und das Modell ver¬ 
vollständigt: ein maßstabsgetreuer Entwurf entsteht. 
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bungskopie und anschließende Vergrößerung beziehungs¬ 
weise Verkleinerung innerhalb der Kopie aus einem Original 
herstellen. Der Festpunkt ist stets ein Konstruktionspunkt 
und muß daher erst selbst konstruiert werden, zum Beispiel 
als Mittelpunkt einer Form. 

Der Maßfaktor muß vor der Operation mit Hilfe von 
BEWEG/MESSW erst ermittelt und als Verhältnis berechnet 
werden. 

Zum Zweck einer anderen Perspektive sollte man Objekte 
nie selbst mit MASTB verändern, sondern dafür immer mit 
dem Menü AUGEN den Augen- und Blickpunkt oder den 
Vergrößerungs* und Zoomfaktor verändern. 

Man beachte, daß bei Kopien sogenannte Doppelpunkte 
entstehen können. Das sind Punkte mit unterschiedlicher 
Nummer, die sich aber geometrisch am selben Ort befinden. 
Bei Doppelpunkten besteht leicht die Gefahr von Fehlkon¬ 
struktionen, so daß man diese sofort reduzieren sollte mit den 
Menüpunkten FORME/PUNKT/DOPLT oder aber pauschal 
mit DATEN/DATEN ORDNEN. Nur wenn es konstruktiv sinn¬ 
voll ist, daß zwei sich teilweise überlagernde Objekte wegen 
des weiteren Konstruktionsvorgangs bestehen bleiben, 
sollte man nicht reduzieren. Dann lassen sich Doppelpunkte 
notfalls mit DIREKTBEFEHL anpicken. 

MESSW 

Menü zu Kommandos, mit denen Abstände und Winkel 
innerhalb der Konstruktion vermessen werden können. Die 
Meßwerte werden angezeigt. 

Menüpfad: BEWEG/MESSW 

Nach der Auswahl von MESSW verschwindet das Menü 
und es erscheint ein neues Menü mit den folgenden Begrif¬ 
fen: 

LAENG WINKL ABSPG ABSPE ABSGG 

Als Voreinstellung wird stets der erste Menüpunkt mar¬ 
kiert. Diese Markierung kann mit der Taste <CRSR>-rechts 
zyklisch verschoben werden, so daß auf ABSGG wieder 
Menüpunkt LAENG folgt. Mit < RETURN > wird eine Aus¬ 
wahl vorgenommen und mit <X> gelangt man in das über¬ 
geordnete Menü zurück. 

NORMA 

Grafisches Kommando zum Errichten einer Normalenlinie 
auf einer Ebene aus drei Konstruktionspunkten. Der Fuß¬ 
punkt der Normale liegt in einem der drei Konstruktions¬ 
punkte. 

Menüpfad: FORME/LINIE/NORMA 

Nach der Auswahl von NORMA erscheint ein Fadenkreuz 
in der Bildschirmmitte und der Menüpunkt bleibt markiert. Die 
Bewegung des Fadenkreuzes erfolgt mit den Cursortasten 
und mit <V>, < + > und <->. 

Man fährt mit dem Kreuz drei vorhandene Konstruktions¬ 
punkte an und drückt jeweils auf < RETURN >. Der erste 
Punkt ist dabei der Fußpunkt der Normalen und bestimmt mit 
den beiden anderen zusammen die Ebene, auf der die Nor¬ 
male errichtet wird. Die Länge der neuen Linie wird in der 
Kopfleiste des Bildschirms abgefragt. Als Voreinstellung 
dient der Abstand der beiden ersten ausgewählten Punkte. 
Der Wert kann beliebig überschrieben werden und wird mit 
< RETURN > übernommen. Die Länge kann notfalls auch in 
BEWEG/MESSW ermittelt werden durch Messung oder über 
eine Hilfskonstruktion. Die Länge 0 führt zum Abbruch, nega¬ 
tive Längen hingegen sind erlaubt. Sie kehren die Richtung 
der Normalen um. Ansonsten definiert sich die Richtung nach 
der rechte-Hand-Regel aus der Richtung von Punkt 1 nach 
Punkt 2 und von Punkt 2 nach Punkt 3. 

Danach wird der Endpunkt der Normalenlinie als neuer 
Konstruktionspunkt berechnet. Bevor dieser Punkt und die 
Normale in die Konstruktion übernommen werden können, 
muß für den Punkt eine Nummer eingegeben werden. Das 
Programm fragt die Punktnummer ab. Das Eingabefeld in der 
Kopfzeile des Bildschirms kann beliebig beschrieben wer¬ 



den. Mit < RETURN > wird der angezeigte Wert übernom¬ 
men. 

Beim Anpicken der Punkte wird stets der Raumpunkt aus¬ 
gewählt, dessen Bildpunkt dem Fadenkreuz am nächsten ist. 
Bei einfachen Konstruktionen braucht man es daher nicht so 
genau zu nehmen. Bei komplexen Modellen dagegen muß 
man sorgfältig Vorgehen und notfalls auch mal eine Aus¬ 
schnittsvergrößerung mit dem Menü AUGEN erzeugen oder 
auf DIREKTBEFEHLE zurückgreifen. Besondere Vorsicht ist 
auch bei Doppelpunkten geboten (siehe DOPLT). Während 
NORMA stehen alle DIREKTBEFEHLE zur Verfügung. 

Nach Beendigung der Eingabe wird die Normalenlinie in 
der Konstruktion mit dargestellt und das Programm geht in 
das übergeordnete Menü zurück. NORMA kann zu jeder Zeit 
mit <X> ohne Folgen für die Konstruktion abgebrochen 
werden. Punktnummern dürfen nur zwischen 0 und 9999 lie¬ 
gen. Bereits vergebene Nummern werden vom Programm 
nicht angenommen und mit einer Fehlermeldung kommen¬ 
tiert. 

Falls drei Punkte ausgewählt werden, die keine Ebene 
bestimmen, wird das Kommando ebenfalls abgebrochen. 
Wenn das Kommando einmal nicht die gewünschte Wirkung 
zeigt, vergewissere man sich, wie das Modell tatsächlich auf¬ 
gebaut ist (DATEN/DATEN AENDERN), da gelegentlich DOP¬ 
PELPUNKTE oder BLINDPUNKTE nicht bedacht werden. 
PRISMATISCHE FORM 

Numerisches Kommando zur Erzeugung der Meridianli¬ 
nien prismatischer Körper, deren Deckel in bestimmter 
Weise konstruiert worden sind. Nach Ausführung des Kom¬ 
mandos ist eine vorher gültige Grafik nicht mehr ansprechbar. 
Menüpfad: DATEN/DATEN AENDERN/FORMEN/PRISMATI- 
SCHE FORM 

Ein prismatischer Körper sollte aus zwei Deckelteilen 
bestehen, die ähnlich konstruiert sind. Damit die Verbin¬ 
dungslinien zwischen den Deckeln nicht einzeln konstruiert 
werden müssen, wurde dieses Kommando geschaffen. 
Wenn die miteinander zu verbindenden Punkte der beiden 
Deckel jeweils so numeriert sind, daß sie sich nur um einen 
festen Inkrementwert unterscheiden, kann dieses Kom¬ 
mando angewendet werden. Dies muß bei der Konstruktion 
der Deckel vorher bedacht werden. Bei ähnlichen Deckeln 
wird man ohnehin nur einen ausführlich konstruieren und den 
anderen zum Beispiel durch Verschieben mit Kopie erzeu¬ 
gen. 

Nach der Auswahl des Menüpunkts muß der zu bearbei¬ 
tende Punktbereich eines Deckels eingegeben werden. 
Dazu gibt man eine Nummer für den Anfangs- und den End¬ 
punkt ein. Die Eingaben werden mit < RETURN > übernom¬ 
men. Alle Punkte mit Nummern in dem vorher bestimmten 
Punktintervall werden bearbeitet. 

Es sind nur Punktnummern von 0 bis 9999 zulässig. Leere 
Punktintervalle und unzulässige Grenzen führen zum 
Abbruch des Kommandos. 

Für den anderen Deckel wird nun nach dem Inkrement der 
Punktnummern gefragt. Wenn diese Eingabe mit 
< RETURN > übergeben wird, werden zwischen den 
Deckeln Punktverbindungen in die Linientabelle eingetragen. 
Bei ungeeigneter Deckelnumerierung entstehen dabei Blind¬ 
linien zu den Punkten des explizit ausgewählten Deckels. 
Eine Prüfung nimmt das Programm nicht vor. 

Nach numerischen Befehlen kann mit dem Menü AUGEN 
eine neue gültige Grafik der Konstruktion hergestellt werden. 
PROJK 

Grafisches Kommando zur Parallelprojektion unter beliebi¬ 
ger Richtung auf eine Ebene aus Konstruktionspunkten. Die 
Projektionslinie bis zur Projektionsebene wird dabei miter¬ 
stellt. 

Menüpfad: FORME/SCHNT/PROJK 

Nach der Auswahl von PROJK erscheint ein Fadenkreuz in 
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Bild 12. Den Einheitswürfel Bild 13. Die kleine Pyramide 
finden Sie Im Menüpfad entsteht am schnellsten, wenn 

FORME/BIBLI sie grafisch ergänzt wird 

der Bildschirmmitte und der Menüpunkt bleibt markiert. Mit 
den Cursortasten wird das Fadenkreuz bewegt, mit den 
Tasten <V>, < + > und <-> kann die Schrittgeschwindig¬ 
keit und -weite des Fadenkreuzes variiert werden. Man fährt 
mit dem Kreuz zunächst fünf vorhandene Konstruktions¬ 
punkte an und drückt jeweils auf < RETURN >. Die beiden 
zuerst ausgewählten Konstruktionspunkte bestimmen die 
Projektionsrichtung. Die restlichen drei ausgewählten 
Punkte bestimmen die Projektionsebene. Die Reihenfolge 
der Auswahl ist ansonsten nicht wesentlich. 

Danach beginnt die punktweise Auswahl der zu projizieren¬ 
den Konstruktionspunkte. Jeder Punkt wird einzeln ange¬ 
pickt. Danach wird die Nummer des anderen Endpunkts der 
neuen Projektionslinie abgefragt und anschließend die Grafik 
und das Konstruktionsmodell aktualisiert. Danach bleibt 
PROJK aktiv und man kann direkt weitere Punkte zur Projek¬ 
tion anpicken, ohne die Projektionsrichtung und -ebene neu 
zu bestimmen. 

Nach jeder Eingabe wird der neue Konstruktionspunkt 
berechnet. Bevor dieser Punkt und die neue Linie in die Kon¬ 
struktion übernommen werden können, muß für den Punkt 
eine Nummer eingegeben werden. Das Programm fragt die 
Punktnummer ab. Das Eingabefeld in der Kopfzeile des 
Bildschirms kann beliebig beschrieben werden. Mit 
< RETURN > wird der angezeigte Wert übernommen. 

Beim Anpicken der Konstruktionspunkte wird stets der 
Raumpunkt ausgewählt, dessen Bildpunkt dem Fadenkreuz 
am nächsten ist. Bei einfachen Konstruktionen braucht man 
es daher nicht so genau zu nehmen. Bei komplexen Modellen 
dagegen muß man sorgfältig Vorgehen und auch mal eine 
Ausschnittsvergrößerung mit dem Menü AUGEN erzeugen 
oder auf DIREKTBEFEHLE zurückgreifen. Besondere Vor¬ 
sicht ist auch bei Doppelpunkten geboten (siehe DOPLT). 
Während PROJK stehen alle DIREKTBEFEHLE zur Verfü¬ 
gung. 

Nach Beendigung der Eingabe für einen Punkt wird die 
neue Linie in der Konstruktion mit dargestellt und das Pro¬ 
gramm geht in das übergeordnete Menü zurück. PROJK 
kann zu jeder Zeit mit < X > ohne Folgen für die Konstruktion 
abgebrochen werden. Punktnummern dürfen nur zwischen 0 
und 9999 liegen. Bereits vergebene Nummern werden vom 
Programm nicht angenommen und mit einer Fehlermeldung 
kommentiert. 

Falls Punkte ausgewählt werden, die keine Projektionsrich¬ 
tung oder Projektionsebene bestimmen, wird das Kom¬ 
mando ebenfalls abgebrochen. Wenn das Kommando einmal 
nicht die gewünschte Wirkung zeigt, vergewissere man sich, 
wie das Modell tatsächlich aufgebaut ist (DATEN/DATEN 
AENDERN), da gelegentlich DOPPELPUNKTE oder BLIND¬ 
PUNKTE nicht bedacht werden. 

Möglich ist aber auch, daß wegen Parallelität von Projek¬ 
tionsrichtung und -ebene kein neuer Punkt berechnet wer¬ 
den kann. 


PUNKT 

Menü zu Kommandos, mit denen einzelne Punkte konstru¬ 
iert oder gelöscht werden können. 

Menüpfad: FORME/PUNKT 

Nach der Auswahl von PUNKT verschwindet das Menü und 
es erscheint ein weiteres Menü mit den folgenden Begriffen: 
DOPLT LOESC LINZP LOTGR LOTEB 

Als Voreinstellung wird stets der erste Menüpunkt mar¬ 
kiert. Diese Markierung kann mit der Taste <CRSR>-rechts 
zyklisch verschoben werden, so daß auf LOTEB wieder 
Menüpunkt DOPLT folgt. Mit < RETURN > wird eine Auswahl 
vorgenommen und mit <X> gelangt man in das übergeord¬ 
nete Menü zurück. 

PUNKTE 

Numerische Anzeige und Veränderung der Punkttabelle 
des Konstruktionsmodells. 

Menüpfad: DATEN/DATEN AENDERN/PUNKTE 

Nach der Auswahl des Menüpunkts werden die ersten 20 
Konstruktionsplätze der Punkttabelle angezeigt. Jeder Punkt 
besteht aus einer Punktnummer von 0 bis 9999 und drei 
Koordinatenwerten X, Y und Z. 

Mit den <- und >-Tasten kann man in der Tabelle seiten¬ 
weise um 20 Plätze zurück- oder vorwärtsblättern. Mit 
< HOME> wird der nicht blinkende Cursor auf die oberste 
Schreibstelle gesetzt, mit der Taste < RETURN > auf die 
nächstfolgende. Mit den Cursortasten kann der Cursor 
außerdem in alle Richtungen bewegt werden. 

Die auf dem Bildschirm angezeigten Werte sind stets gül¬ 
tig. Dadurch ist die Eingabe ein einfaches Überschreiben der 
vorgegebenen Werte auf dem Bildschirm. Lediglich 
unbrauchbare Daten, wie Textzeichen oder Zahlen oberhalb 
1.E8 absolut, führen zu automatischen Korrekturen nach Ver¬ 
lassen der Tabellenseite. Der Wert -1 als Punktnummer in der 
Tabelle igt an, daß in diesem Tabellenplatz kein Punkt ein¬ 
getragen ist. Die Koordinatenwerte spielen dann keine Rolle. 

Mit <X> kann man den Menüpunkt PUNKTE verlassen. 
Falls Änderungen vorgenommen wurden, ist eine vorher 
erzeugte Grafik ungültig und muß mit dem Menü AUGEN neu 
erstellt werden. 

Für das Schreiben in der Tabelle sind bestimmte Felder fest 
vorgegeben. Beim Verlassen eines Schreibfeldes springt der 
Cursor stets auf die erste Stelle des nächsten Schreibfeldes. 

Die Begrenzung von 40 Zeichen pro Bildschirmzeile ver¬ 
langt, daß Koordinatenwerte nicht in maximaler Genauigkeit 
angezeigt werden. Eine Genauigkeit von 0,001 mm ist bei 
Maßen bis 100 m sichergestellt. Außerdem erkennt das Pro¬ 
gramm, ob ein Wert geändert wurde. 

PUNKTE KOPIEREN 

Numerisches Kommando zum Kopieren einer Punkt¬ 
gruppe. Die Kopie erhält eine neue gegenüber der alten ver¬ 
schobene Numerierung. Nach Ausführung des Kommandos 
ist eine vorher gültige Grafik nicht mehr ansprechbar. 
Menüpfad: DATEN/DATEN AENDERN/FORMEN/PUNKTE 
KOPIEREN 

Nach der Auswahl des Menüpunkts muß der zu bearbei¬ 
tende Punktbereich eingegeben werden. Dazu gibt man eine 
Nummer für den Anfangs- und den Endpunkt ein. Die Einga¬ 
ben werden mit < RETURN > übernommen. Alle Punkte mit 
Nummern in dem vorher bestimmten Punktintervall werden 
bearbeitet. 

Es sind nur Punktnummern von 0 bis 9999 zulässig. Leere 
Punktintervalle und unzulässige Grenzen führen zum 
Abbruch des Kommandos. 

Die neu entstehenden Konstruktionspunkte werden ent¬ 
sprechend dem Original numeriert. Dazu wird auf Anforde¬ 
rung ein Punktinkrement eingegeben. Um diesen Wert sind 
die Nummern der neuen Punkte größer oder kleiner als die 
alten Nummern. Hierbei ist auf Überschneidungen bei der 
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Numerierung zu achten, da das Programm keine Überprü¬ 
fung vornimmt. 

Nach der Übernahme der kopierten Punkte in die Punkt¬ 
tabelle wird abgefragt, ob auch die Linien mitzukopieren, wel¬ 
che aus zwei ausgewählten Punkten bestehen. Linien, von 
denen nur ein Endpunkt ausgewählt wurde, werden nicht 
berücksichtigt. Die Numerierung der neuen Linien wird der 
Punktnumerierung automatisch angepaßt. 

Zur räumlichen Trennung von Original und Kopie verwende 
man Verschiebebefehle. Nach numerischen Befehlen kann 
mit dem Menü AUGEN eine neue gültige Grafik der Konstruk¬ 
tion hergestellt werden. 

PUNKTE LOESCHEN 

Numerisches Kommando zum Löschen einer Punkt¬ 
gruppe. Nach Ausführung des Kommandos ist eine vorher 
gültige Grafik nicht mehr ansprechbar. 

Menüpfad: DATEN/DATEN AENDERN/FORMEN/PUNKTE 
LOESCHEN 

Nach der Auswahl des Menüpunkts muß der zu bearbei¬ 
tende Punktbereich eingegeben werden. Dazu gibt man eine 
Nummer für den Anfangs- und den Endpunkt ein. Die Einga¬ 
ben werden mit < RETURN > übernommen. Alle Punkte mit 
Nummern in dem vorher bestimmten Punktintervall werden 
bearbeitet. 

Es sind nur Punktnummern von 0 bis 9999 zulässig. Leere 
Punktintervalle und unzulässige Grenzen führen zum 
Abbruch des Kommandos. 

Nach dem Löschen der ausgewählten Punkte in der Punkt¬ 
tabelle wird abgefragt, ob auch Linien mitzulöschen sind, wel¬ 
che aus zwei ausgewählten Punkten bestehen. Linien, von 
denen nur ein Endpunkt ausgewählt wurde, werden nicht 
berücksichtigt. 

Nach numerischen Befehlen kann mit dem Menü AUGEN 
eine neue gültige Grafik der Konstruktion hergestellt werden. 

PUNKTE UMNUMERIEREN 

Numerisches Kommando zum Umnumerieren einer Punkt¬ 
gruppe. Die Gruppe erhält eine neue gegenüber der alten 
verschobene Numerierung. Linieneinträge werden entspre¬ 
chend mitgeändert. Eine vorhandene Grafik bleibt gültig. 
Menüpfad: DATEN/DATEN AENDERN/FORMEN/PUNKTE 
UMNUMERIEREN 

Nach der Auswahl des Menüpunkts muß der zu bearbei¬ 
tende Punktbereich eingegeben werden. Dazu gibt man eine 
Nummer für den Anfangs- und den Endpunkt ein. Die Einga¬ 
ben werden mit < RETURN > übernommen. Alle Punkte mit 
Nummern in dem vorher bestimmten Punktintervall werden 
bearbeitet. 

Es sind nur Punktnummern von 0 bis 9999 zulässig. Leere 
Punktintervalle und unzulässige Grenzen führen zum 
Abbruch des Kommandos. 

Zwecks Umnumerierung wird ein Punktinkrement eingege¬ 
ben. Um diesen Wert sind die Nummern der ausgewählten 
Punkte größer oder kleiner gemacht. Hierbei ist auf Über¬ 
schneidungen bei der Numerierung zu achten, da das Pro¬ 
gramm keine Überprüfung vornimmt. 

Nach der Änderung der Punkttabelle werden Linien, wel¬ 
che ausgewählte Punkte enthalten, umnumeriert auf die 
neuen Punktnummern. 

PUNKTE VERSCHIEBEN 

Numerisches Kommando zur geradlinigen Verschiebung 
einer Punktgruppe. Eine vorher vorhandene Grafik der Kon¬ 
struktion wird durch die Operation ungültig. 

Menüpfad: DATEN/DATEN AENDERN/FORMEN/PUNKTE 
VERSCHIEBEN 

Nach der Auswahl des Menüpunkts muß der zu bearbei¬ 
tende Punktbereich eingegeben werden. Dazu gibt man eine 
Nummer für den Anfangs- und den Endpunkt ein. Die Einga¬ 


ben werden mit < RETURN > übernommen. Alle Punkte mit 
Nummern in dem vorher bestimmten Punktintervall werden 
bearbeitet. 

Es sind nur Punktnummern von 0 bis 9999 zulässig. Leere 
Punktintervalle und unzulässige Grenzen führen zum 
Abbruch des Kommandos. 

Danach werden die drei Koordinaten X, Y und Z des Ver¬ 
schiebungsvektors eingegeben und mit < RETURN > 
jeweils übernommen. Nun werden die Koordinaten der aus¬ 
gewählten Punkte neu berechnet. Die Linientabelle bleibt 
durch dieses Kommando unbeeinflußt. Nach der Operation 
kann mit dem Menü AUGEN eine neue Grafik erstellt werden. 

SCHEF 

Grafisches Kommando zum Schnitt einer Konstruktions¬ 
ebene mit einem Teilobjekt. Es entstehen nur Schnittpunkte, 
die als Blindpunkte in die Konstruktion übernommen werden. 
Menüpfad: FORME/SCHNT/SCHEF 

Nach der Auswahl von SCHEF erscheint ein Fadenkreuz in 
der Bildschirmmitte und der Menüpunkt bleibt markiert. Die 
Bewegung des Fadenkreuzes erfolgt mit den Cursortasten 
und mit <V>, < + > und <->. Man fährt mit dem Kreuz 
zunächst drei vorhandene Konstruktionspunkte an und 
drückt jeweils auf < RETURN >. Diese Punkte bestimmen 
die Schnittebene. Die Reihenfolge der Auswahl ist ansonsten 
nicht wesentlich. 

Danach beginnt die Auswahl des zu schneidenden 
Objekts. Hierzu fragt das Programm ein Intervall von Punkt¬ 
nummern ab, die das Schnittobjekt definieren sollen. Alle 
Konstruktionspunkte mit Nummern zwischen dem Anfangs¬ 
und Endpunkt, die nacheinander einzugeben sind, ergeben 
das Objekt. Linien, die aus zwei Punkten dieses Objekts 
bestehen, werden im folgenden mit der vorher bestimmten 
Eben“ zum Schnitt gebracht. Nur Schnittpunkte innerhalb 
der Linie werden berücksichtigt. 

Für die neu entstehenden Schnittpunkte sind Nummern 
festzulegen. Hier wird nach Vorgabe eines Startwertes ein¬ 
fach in Einerschritten durchnumeriert. 

Die Schnittpunkte sind nach der Operation sowohl im Kon¬ 
struktionsmodell als auch in der Grafik als Blindpunkte vor¬ 
handen. Man sollte sie mit dem DIREKTBEFEHL M sichtbar 
markieren und zum Beispiel mit LINZP in die Konstruktion ein¬ 
binden. 

Beim Anpicken der Schnittebenenpunkte wird stets der 
Raumpunkt ausgewählt, dessen Bildpunkt dem Fadenkreuz 
am nächsten ist. Bei einfachen Konstruktionen braucht man 
es daher nicht so genau zu nehmen. Bei komplexen Modellen 
dagegen muß man sorgfältig Vorgehen und auch mal eine 
Ausschnittsvergrößerung mit dem Menü AUGEN erzeugen 
oder auf DIREKTBEFEHLE zurückgreifen. Besondere Vor¬ 
sicht ist auch bei Doppelpunkten geboten (siehe DOPLT). 
Während SCHEF stehen alle DIREKTBEFEHLE zur Verfü¬ 
gung. 

SCHEF kann während der Auswahl der Ebene mit <X> 
ohne Folgen für die Konstruktion abgebrochen werden. 
Punktnummern dürfen nur zwischen 0 und 9999 liegen. 
Überschneidungen bei der Numerierung werden vom Pro¬ 
gramm nicht überprüft. Unzulässige Punktnummern oder 
leere Schnittobjekte führen zu einem folgenlosen Abbruch 
des Kommmandos. 

Falls Punkte ausgewählt werden, die keine Schnittebene 
bestimmen, wird das Kommando ebenfalls abgebrochen. 
Wenn das Kommando einmal nicht die gewünschte Wirkung 
zeigt, vergewissere man sich, wie das Modell tatsächlich auf¬ 
gebaut ist (DATEN/DATEN AENDERN), da gelegentlich DOP¬ 
PELPUNKTE oder BLINDPUNKTE nicht bedacht werden. 

Möglich ist aber auch, daß wegen Richtung oder Lage der 
Schnittebene keine Schnitte innerhalb des Objekts Zu¬ 
standekommen. 
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SCHGE 

Grafisches Kommando zum Schnitt einer Gerade mit einer 
Ebene aus vorhandenen Konstruktionspunkten. Die Linie bis 
zum Schnittpunkt wird dabei miterstellt. 

Menüpfad: FORME/SCHNT/SCHGE 

Nach der Auswahl von SCHGE erscheint ein Fadenkreuz in 
der Bildschirmmitte und der Menüpunkt bleibt markiert. Auch 
hier erfolgt die Steuerung mit den Cursortasten und mit 
<V>, < + > und <->. Man fährt mit dem Kreuz fünf vor¬ 
handene Konstruktionspunkte an und drückt jeweils auf 

< RETURN >. Die beiden zuerst ausgewählten Konstruk¬ 
tionspunkte bestimmen die zu schneidende Gerade. Die letz¬ 
ten drei Punkte bestimmen die Ebene. 

Die Reihenfolge der Auswahl ist für die neue Linie wesent¬ 
lich. Die restlichen drei ausgewählten Punkte bestimmen die 
Schnittebene. Ihre Reihenfolge bei der Auswahl spielt keine 
Rolle. 

Nach der Berechnung des Schnittpunktes wird eine Kon¬ 
struktionslinie vom zuerst ausgewählten Punkt zum Schnitt¬ 
punkt erzeugt oder eine vorhandene Konstruktionslinie wird 
am Schnittpunkt geteilt. Dabei spielt die Lage der beiden 
Geradenpunkte zum Schnittpunkt die entscheidende Rolle. 
Wenn die schneidende Gerade vor der Operation keine Kon¬ 
struktionslinie war, wird die Linie vom Punkt 1 zum Schnitt¬ 
punkt neu erzeugt. Wenn die ausgewählte Gerade vom 
Schnittpunkt geteilt wird, erfolgt auch im Konstruktionsmo¬ 
dell eine Zerlegung der ausgewählten Linie in zwei, wovon 
eine dann neu ist. 

In allen anderen Fällen wird eine neue Linie vom zuerst aus¬ 
gewählten Punkt der Gerade zum Schnittpunkt erzeugt. Hier¬ 
durch können bei ungeschickter Auswahl Geradenteile 
durch zwei Linien belegt werden. Abhilfe schafft dann nach¬ 
trägliches Löschen von Linien und eventuell erneute Verbin¬ 
dung (LOEPP, ZUSPP). S 4 CR 

Nach der Eingabe wird der neue Konstruktionspunkt 
berechnet. Bevor dieser Punkt und die neue Linie in die Kon¬ 
struktion übernommen werden können, muß für den Punkt 
eine Nummer eingegeben werden. Das Programm fragt die 
Punktnummer ab. Das Eingabefeld in der Kopfzeile des 
Bildschirms kann beliebig beschrieben werden. Mit 

< RETURN > wird der angezeigte Wert übernommen. 

Beim Anpicken der Konstruktionspunkte wird stets der 

Raumpunkt ausgewählt, dessen Bildpunkt dem Fadenkreuz 
am nächsten ist. Bei einfachen Konstruktionen braucht man 
es daher nicht so genau zu nehmen. Bei komplexen Modellen 
dagegen muß man sorgfältig Vorgehen und notfalls auch mal 
eine Ausschnittsvergrößerung mit dem Menü AUGEN erzeu¬ 
gen oder auf DIREKTBEFEHLE zurückgreifen. 

Besondere Vorsicht ist auch bei Doppelpunkten geboten 
(siehe DOPLT). Während SCHGE stehen alle DIREKTBE¬ 
FEHLE zur Verfügung. 

Nach Beendigung der Eingabe wird die neue Linie in der 
Konstruktion mit dargestellt und das Programm geht in das 
übergeordnete Menü zurück. SCHGE kann zu jeder Zeit mit 
<X> ohne Folgen für die Konstruktion abgebrochen wer¬ 
den. Punktnummern dürfen nurzwischen 0 und 9999 liegen. 
Bereits vergebene Nummern werden vom Programm nicht 
angenommen und mit einer Fehlermeldung kommentiert. 

Falls Punkte ausgewählt werden, die keine Gerade bezie¬ 
hungsweise Ebene bestimmen, wird das Kommando eben¬ 
falls abgebrochen. 

Wenn das Kommando einmal nicht die gewünschte Wir¬ 
kung zeigt, vergewissere man sich, wie das Modell tatsäch¬ 
lich aufgebaut ist (DATEN/DATEN AENDERN), da gelegent¬ 
lich DOPPELPUNKTE oder BLINDPUNKTE nicht bedacht 
werden. 

Möglich ist aber auch, daß wegen Parallelität kein Schnitt¬ 
punkt Zustandekommen kann. 


SCHGG 

Grafisches Kommando zum Schnitt zweier Geraden aus 
Konstruktionspunkten, die in einer Ebene liegen. Die Linie bis 
zum Schnittpunkt wird dabei miterstellt. 

Menüpfad: FORME/SCHNT/SCHGG 

Nach der Auswahl von SCHGG erscheint ein Fadenkreuz 
in der Bildschirmmitte und der Menüpunkt bleibt markiert. Die 
Bewegung des Fadenkreuzes erfolgt mit den Cursortasten 
und mit <V>, < + > und <->. Man fährt mit dem Kreuz vier 
vorhandene Konstruktionspunkte an und drückt jeweils auf 

< RETURN >. Die beiden zuerst ausgewählten Konstruk¬ 
tionspunkte bestimmen eine zu schneidende Gerade. Die 
Reihenfolge der Auswahl ist für die neue Linie wesentlich. Die 
restlichen beiden ausgewählten Punkte bestimmen die 
andere Schnittgerade. Ihre Reihenfolge bei der Auswahl 
spielt keine Rolle. 

Nach der Berechnung des Schnittpunktes wird eine Kon¬ 
struktionslinie vom zuerst ausgewählten Punkt zum Schnitt¬ 
punkt erzeugt, oder eine vorhandene Konstruktionslinie wird 
am Schnittpunkt geteilt. Dabei spielt die Lage der beiden 
ersten Geradenpunkte zum Schnittpunkt die entscheidende 
Rolle. Wenn die schneidende Gerade vor der Operation keine 
Konstruktionslinie war, wird die Linie vom Punkt 1 zum 
Schnittpunkt neu erzeugt. Wenn die ausgewählte Gerade 
vom Schnittpunkt geteilt wird, erfolgt auch im Konstruktions¬ 
modell eine Zerlegung der ausgewählten Linie in zwei, wovon 
eine dann neu ist. In allen anderen Fällen wird eine neue Linie 
vom zuerst ausgewählten Punkt der Gerade zum Schnitt¬ 
punkterzeugt. Hierdurch können bei ungeschickter Auswahl 
Geradenteile durch zwei Linien belegt werden. Abhilfe 
schafft dann nachträgliches Löschen von Linien und gegebe¬ 
nenfalls erneute Verbindung (LOEPP, ZUSPP). 

Falls die beiden Geraden nicht in einer Ebene liegen, wird 
trotzdem die Schnittoperation ausgeführt. Es wird ersatz¬ 
weise en id Schnittebene senkrecht zu beiden Linien verwen¬ 
det, welche die zweite ausgewählte Gerade umfaßt. 

Nacih der Eingabe wird der neue Konstruktionspunkt 
berechnet Bevor dieser Punkt und die neue Linie in die Kon¬ 
struktion übernommen werden können, muß für den Punkt 
eircfe Nümrrier' feingegeben werden. Das Programm fragt die 
Punktnummer ab. Das Eingabefeld in der Kopfzeile des 
Bildschirms kann beliebig beschrieben werden. Mit 

< RETURN > wird der angezeigte Wert übernommen. 

Beim Anpicken der Konstruktionspunkte wird stets der 

Raumpunkt ausgewählt, dessen Bildpunkt dem Fadenkreuz 
am nächsten ist. Bei einfachen Konstruktionen braucht man 
es daher nicht so genau zu nehmen. Bei komplexen Modellen 
dagegen muß man sorgfältig Vorgehen und auch mal eine Aus¬ 
schnittsvergrößerung mit dem Menü AUGEN erzeugen oder 
auf DIREKTBEFEHLE zurückgreifen. Besondere Vorsicht ist 
auch bei Doppelpunkten geboten (siehe DOPLT). Während 
SCHGG stehen alle DIREKTBEFEHLE zur Verfügung. 



Bild 14. Mit zwei Splegelungen exakt erzeugte Kopien: 
Vorsicht vor Doppelpunkten! 
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Nach Beendigung der Eingabe wird die neue Linie in der 
Konstruktion mit dargestellt und das Programm geht in das 
übergeordnete Menü zurück. SCHGG kann zu jeder Zeit mit 
<X> ohne Folgen für die Konstruktion abgebrochen wer¬ 
den. Punktnummern dürfen nur zwischen 0 und 9999 liegen. 
Bereits vergebene Nummern werden vom Programm nicht 
angenommen und mit einer Fehlermeldung kommentiert. 

Falls Punkte ausgewählt werden, die keine Geraden 
bestimmen, wird das Kommando ebenfalls abgebrochen. 
Wenn das Kommando einmal nicht die gewünschte Wirkung 
zeigt, vergewissere man sich, wie das Modell tatsächlich auf¬ 
gebaut ist (DATEN/DATEN AENDERN), da gelegentlich DOP¬ 
PELPUNKTE oder BLINDPUNKTE nicht bedacht werden. 

Möglich ist aber auch, daß wegen Parallelität kein Schnitt¬ 
punkt Zustandekommen kann. 

SCHNT 

Menü zu Kommandos, mit denen einfache Schnittoperatio¬ 
nen durchgeführt werden können. Dazu gehört auch eine 
Parallelprojektion auf eine Konstruktionsebene. 

Menüpfad: FORME/SCHNT 

Nach der Auswahl von SCHNT verschwindet das Menü und 
es erscheint ein neues Menü mit den folgenden Begriffen: 
SCHGE SCHGG SCHEF HPROF PROJK 

Als Voreinstellung wird stets der erste Menüpunkt mar¬ 
kiert. Diese Markierung kann mit der Taste < CRSR > -rechts 
zyklisch verschoben werden, so daß auf PROJK wieder 
Menüpunkt SCHGE folgt. Mit < RETURN > wird eine Aus¬ 
wahl vorgenommen und mit <X> gelangt man in das über¬ 
geordnete Menü zurück. 

SPIEG 

Mit diesem grafischen Kommando können ganze Objekte 
oder beliebige Teilobjekte an einer Konstruktionsebene 
gespiegelt werden. Anstelle der Originalpunkte können auch 
kopierte Punkte gespiegelt werden. Spiegelsymmetrische 
Konstruktionen brauchen also nur zur Hälfte konstruiert zu 
werden. 

Menüpfad: BEWEG/SPIEG 

Nach der Auswahl von SPIEG erscheint das Fadenkreuz in 
der Bildmitte. Der Menüpunkt SPIEG bleibt weiterhin mar¬ 
kiert. Mit den Cursortasten und < V >, < + > und < - > wird 
das Fadenkreuz gesteuert. Zuerst wird die Spiegelebene für 
die Operation definiert. Dazu fährt man drei vorhandene Kon¬ 
struktionspunkte an und drückt jeweils auf < RETURN >. Als 
Bestätigung verschwinden kurzzeitig Fadenkreuz und Mar¬ 
kierung des Menüpunktes SPIEG. 

In der Kopfzeile wird gefragt, ob das noch festzulegende 
Spiegelobjekt das Original ist (Antwort: <N >) oder ob eine 
Kopie (Antwort: <J>) anzufertigen und zu spiegeln ist. Da 
bei einer Kopie neue Punkte entstehen, müssen deren 
Punktnummern eventuell vom Benutzer angegeben werden. 
Um dies zu vereinfachen, wird lediglich ein Wert eingegeben. 
Dies ist ein Inkrementwert, um den später die Nummern der 



Bild 15. Erst wenn die Doppelpunkte weg sind, dürfen die 
Linien des Würfels (siehe Bild 14) gelöscht werden 


Originalpunkte erhöht den Kopiepunkten zugewiesen wer¬ 
den. Negative Werte sind erlaubt. 

Dieses Verfahren erfordert eine sinnvolle Numerierung, 
wenn man das SPIEG-Kommando effektiv nutzen möchte. 
Überschneidungen und andere Unstimmigkeiten in der 
Numerierung sind vom Benutzer selbst zu kontrollieren. Hier¬ 
bei ist die Einteilung in Punktgruppen zweckmäßig. 

Bei der Auswahl der zu spiegelnden Konstruktionspunkte 
gibt es zwei Möglichkeiten. Bei der einen Methode gibt man 
auf die Fragen nach Anfangs- und Endpunkt ein Nummern¬ 
intervall ein, aus dem dann alle Punkte bearbeitet werden. Die 
Werte werden einfach in die Kopfzeile eingetragen durch 
Überschreiben der Voreinstellung und mit < RETURN > 
übernommen. Mit <X> oder einem leeren Zahlenintervall 
kann das Kommando abgebrochen werden. Außerdem sind 
nur Werte von 0 bis 9999 zulässig und der Anfangswert muß 
kleiner gleich dem Endwert sein. Die numerische Auswahl 
erfordert wiederum eine sorgfältige Numerierung des 
Objekts. 

Die andere Auswahlmethode erhält man, wenn man als 
Anfangspunkt die Voreinstellung -1 verwendet, also nur 
< RETURN > drückt. Danach erscheint wieder das Faden¬ 
kreuz. Man kann nun mit den Cursortasten und < RETURN > 
alle zu spiegelnden Punkte einzeln anpicken. Beim letzten 
Punkt gibt man anstatt einmal nun zweimal < RETURN > ein. 
An der doppelten Auswahl des Punktes erkennt das Pro¬ 
gramm die Absicht des Anwenders. 

Durch DIREKTBEFEHLE wird eine gewisse Hilfe bei der 
Punktauswahl gegeben. Mit <X> kann man jederzeit das 
Kommando abbrechen. 

Danach wird die Spiegelung ausgeführt und eine neue Gra¬ 
fik erstellt. Bei einer Kopie werden automatisch alle inneren 
Linie" des ausgewählten Teilobjekts korrekt mitkopiert. Das 
ist dei Fall, wenn beide Linienendpunkte ausgewählt sind. 

Die Linienbeziehungen bleiben bei der Spiegelung beste¬ 
hen, so daß sich Linien nur dann verformen können, wenn nur 
ein Endpunkt der Linie gespiegelt wird. 

Wenn beide Linienendpunkte gespiegelt werden, spiegelt 
sich die ganze Linie an der Spiegelebene. 

Das Spiegeln ist ein nicht selten gebrauchtes Kommando. 
Spiegelsymmetrische Formen lassen sich durch Spiegelko¬ 
pie herstellen. Die Spiegeiebene wird stets durch drei Kon¬ 
struktionspunkte festgelegt und muß daher zum Teil erst 
selbst konstruiert werden, zum Beispiel mit einem Normalen¬ 
vektor auf einer Ebene. 

Manchmal muß nach einer Spiegelung nofch zusätzlich ver¬ 
schoben oder gedreht werden. Verbindungslinien zwischen 
einem Original und dessen Spiegelkopie können bei geeig¬ 
neter Numerierung mit dem Menüpunkt 
DATEN/DATEN AENDERN/FORMEN/PRISMATISCHE FORM 
schnell numerisch erledigt werden. 

Zum Zweck einer anderen Perspektive sollte man Objekte 
nie selbst spiegeln, sondern dafür immer mit dem Menü 
AUGEN den Augen- und Blickpunkt verändern. 

Man beachte, daß bei Kopien sogenannte Doppelpunkte 
entstehen können. Bei Doppelpunkten besteht leicht die 
Gefahr von Fehlkonstruktionen, so daß man diese sofort mit 
den Menüpunkten FORME/PUNKT/DOPLT oder aber pau¬ 
schal mit DATEN/DATEN ORDNEN reduzieren sollte. Nur 
wenn es konstruktiv sinnvoll ist, daß zwei sich teilweise über¬ 
lagernde Objekte wegen des weiteren Konstruktionsvor¬ 
gangs bestehen bleiben, sollte man nicht reduzieren. 

Dann lassen sich Doppelpunkte notfalls mit DIREKTBE¬ 
FEHL anpicken. 

SYSTEM 

Einige für den Programmablauf wichtige Variablen können 
angezeigt und verändert werden. Dies ist für die normale 
Benutzung des Programms nicht nötig und hiervon ist nur bei 
Kenntnis des Programms Gebrauch zu machen. 
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Menüpfad: DATEN/DATEN AENDERN/SYSTEM 

Nach der Auswahl des Menüpunkts erscheint die Über¬ 
schrift PROGRAMMEINSTELLUNGEN. Es werden sequen¬ 
tiell einige Variablen angezeigt und zwecks Änderung abge¬ 
fragt. Bei Variablen, die nicht geändert werden sollen, ist 
unbedingt nur die < RETURN >-Taste zu drücken! 
Beschreibung der Variablen: 

RR Anzahl der belegten Raumpunkte +1 
GG Anzahl der belegten Linien +1 
KL automatische Bildgrößenanpassung 
XY Vertikalverzerrung des Bildschirms bei Grafik 
YX Vertikalverzerrung des Druckers MPS801 bei Grafik 
QR Bildumrechnung für Plotter CBM 8075 
QS Bildumrechnung für Plotter CBM 8075 
QP Bildumrechnung für Plotter CBM 8075 
XM X-Koordinate Blickpunkt 
YM Y-Koordinate Blickpunkt 

T3 Linienzuordnungstabelle per Maschinenprogramm 
RF Rahmenfarbe 

HR Helligkeitswert der Rahmenfarbe 
HF Hintergrundfarbe 
HH Helligkeit der Hintergrundfarbe 
VF Vordergrundfarbe 
HV Helligkeit der Vordergrundfarbe 
BH Bildbreite horizontal 
BV Bildbreite vertikal 
PD Gerätenummer für Ein-/Ausgabe 
MA Dimensionierung Raumpunkte 
MG Dimensionierung Linien 
TV Bildschirmabschaltung bei Rechnung 

WINKL 

Messung des Winkels zwischen zwei Geraden in einer 
Ebene. G^6R 

Menüpfad: BEWEG/MESSW/WINKL 

Nach der Auswahl von WINKL erscheint das Fadenkreuz. 
Durch Anpicken zweier Punkte wird ein Schenkel des Win¬ 
kels definiert. Der zweite (mittlere) Punkt ist stets auch Punkt 
des anderen Schenkels. Durch Anpicken eines weiteren 
Punktes wird der zweite Schenkel vervollständigt. Danach 
erscheint der wahre Winkel gemessen in der Meßebene im 
360-Grad-Maß auf dem Bildschirm. Es wird stets ein positi¬ 
ver Winkel zwischen 0 und 180 Grad ausgegeben. Mit < X > 
oder < RETURN > gelangt man ins Menü zurück. 

Auch Punkte, die nicht Endpunkte einer Linie sind, können 
trotzdem einen Schenkel des Winkels definieren. 

Wenn ein Fehler auftritt, wird kein Winkel ermittelt, sondern 
direkt in das Menü zurückgesprungen. Als Ursache kommt in 
Frage: ungültiges Bild wegen vorheriger Datenänderung 
oder -Ordnung. 

ZUSPP 

Grafisches Kommando zur Verbindung zweier Konstruk¬ 
tionspunkte durch eine Linie. Die Operation erfordert eine 
gültige Grafik. 

Menüpfad: FORME/LINIE/ZUSPP 

Nach der Auswahl von ZUSPP erscheint ein Fadenkreuz in 
der Bildschirmmitte und der Menüpunkt bleibt markiert. Mit 
den Cursortasten und <V>, < + > und <-> wird das 
Fadenkreuz bewegt. Man fährt mit dem Kreuz zwei schon 
vorhandene Konstruktionspunkte an und drückt jeweils auf 
< RETURN >. Danach wird die Verbindungslinie gezeichnet 
und die Linie in die Konstruktion aufgenommen. Beim 
Anpicken der Punkte wird stets der Raumpunkt ausgewählt, 
dessen Bildpunkt dem Fadenkreuz am nächsten ist. Bei ein¬ 
fachen Konstruktionen braucht man es daher nicht so genau 
zu nehmen. Bei komplexen Modellen dagegen muß man 
sorgfältig vorgehen und notfalls auch mal eine Ausschnitts¬ 
vergrößerung mit dem Menü AUGEN erzeugen oder auf 
DIREKTBEFEHLE zurückgreifen. Besondere Vorsicht ist 


auch bei Doppelpunkten geboten (siehe DOPLT). Während 
ZUSPP stehen alle DIREKTBEFEHLE zur Verfügung. 

Nach der Erzeugung einer Linie erscheint wieder das 
Fadenkreuz in der Bildmitte und das Kommando ZUSPP 
bleibt aktiviert. Verlassen kann man ZUSPP zu jeder Zeit mit 
der Taste <X> ohne irgendwelche Folgen für die Konstruk¬ 
tion. Falsch konstruierte Linien können mit dem Menüpunkt 
FORME/LINIE/LOEPP wieder gelöscht werden. 


Tabelle aller Menüs und Kommandos 

ABSGG 

Abstand Gerade Gerade grafisch 

ABSPE 

Abstand Punkt Ebene grafisch 

ABSPG 

Abstand Punkt Gerade grafisch 

ALLES LOESCHEN 

ganzen Datensatz löschen 

ANSICHTSBAHNEN 

Bildfolge entlang einer Augenpunktsbahn 

AUGEN 

Augenpunkt ändern, Bildschirmgrafik 

BEWEG 

Messen, Bewegen, Kopieren grafisch 

BIBLI 

einfache Formen erzeugen mit Grafik 

BILDPUNKTE 

Anzeige von Bildkoordinaten 

BLINDPUNKTE/LINIEN 

Beseitigung unbrauchbarer Daten 

DATEN 

Datenein- und -ausqabe etc. 

DATEN AENDERN 

Datensatz numerisch bearbeiten 

DATEN DRUCKEN 

Druckeroperationen und Plotfile 

DATEN LADEN 

Daten laden von Diskette oder Datasette 

DATEN KOMPRIMIEREN 

Reorganisierung der Tabellen 

DATEN ORDNEN 

Bereinigung und Komprimierung der Daten 

DATEN SORTIEREN 

Sortierung nach aufsteigenden Nummern 

DATEN SPEICHERN 

Daten speichern auf Diskette oder Datasette 

DIREKTBEFEHLE 

Operationen neben dem Fadenkreuz 

DISKVERZEICHNIS 

Inhaltsverzeichnis einer Diskette zeigen 

DATENFILE AENDERN 

Löschen, Umbenennen, Kopieren von Files 

DOPLT 

einzelne Doppelpunkte zusammenfassen grafisch 

DOPPELFU-'KTE/UNIEN 

Reduktion aller solcher Punkte und Linien 

DREHG 

Objektteile beliebig drehen grafisch 

FORME 

grafische Operationen für Punkte/Linien 

FORMEN 

Datengruppen numerisch ändern 

GERAD 

Verschieben/Kopieren Objektteile grafisch 

HPROF 

Projektion auf Hauptebenen 

KOPIE 

Hardcopy der Bildschirmgrafik MPS 801 

LAENG 

Abstand zweier Punkte messen grafisch 

LINEW 

Linie mit Winkel in Ebene erzeugen grafisch 

LINIE 

Linienoperationen grafisch 

LINIEN 

Linientabelle ansehen/ändern numerisch 

LINIEN KOPIEREN 

Liniengruppe numerisch kopieren 

LINIEN LOESCHEN 

Liniengruppe numerisch löschen 

LINPP 

Verlängern einer Linie grafisch 

LINZP 

Punkt in Linie einfüpen grafisch 

LOEPP 

Linie löschen grafisch 

LOESC 

Punkt/beteiligte Linien löschen grafisch 

LOTGR 

Lot auf Gerade grafisch 

LOTEB 

Lot auf Ebene grafisch 

MASTB 

maßstäbliche Veränderung grafisch 

MESSW 

Längen- und Winkelmessung grafisch 

N0RMA 

Normale auf Ebene grafisch erzeugen 

PRISMATISCHE FORM 

numerisch prismatische Form erzeugen 

PROJK 

Parallelprojektion Punkt auf Ebene grafisch 

PUNKT 

Punktoperationen grafisch 

PUNKTE 

ansehen/ändern Punkttabelle numerisch 

PUNKTE KOPIEREN 

Punktgruppe numerisch kopieren 

PUNKTE LOESCHEN 

Punktgruppe numerisch löschen 

PUNKTE UMNUMERIEREN 

Punktgruppe numerisch umnumerieren 

PUNKTE VERSCHIEBEN 

Punktgruppe numerisch verschieben 

SCHEF 

Schnitt eines Objektteils mit Ebene 

SCHGE 

Schnitt Gerade Ebene grafisch 

SCHGG 

Schnitt Gerade Gerade grafisch 

SCHNT 

Schnittoperationen grafisch 

SPIEG 

Spiegeln/Kopieren von Objektteilen grafisch 

SYSTEM 

bestimmte Programmvariablen 

WINKL 

Messen eines Winkels grafisch 

XXXXX 

nicht belegt 

ZUSPP 

Linie aus zwei Punkten grafisch 


Bild 16. Hier finden Sie das gesuchte Menü am schnellsten 
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GRAFIK-LISTING 


Da alle Abmessungen aus dem Computermodell abgefragt 
werden können, ist das Programm PED auch hilfreich bei Fer¬ 
tigungsproblemen im Modellbau. 

Dem Anwender wird eine kleine Buchführung von Hand 
empfohlen. Er sollte zumindest von fertigen Teilobjekten 
getrennte Datensätze anfertigen, die zunächst einzeln und 
getrennt auf Disketten gespeichert und später mit Programm¬ 
unterstützung zusammenmontiert und vereinfacht werden 
können. Auch ist es während der Arbeit sinnvoll, ab und zu 
Sicherheitskopien des augenblicklichen Modells als Daten- 
Files zu speichern. Im Falle eines groben Fehlers kann man 
dann ohne viel Zeitverlust an der Stelle Weiterarbeiten, die als 
letzte gespeichert wurde. Man kann aber auch Varianten 
eines Entwurfs auf diese Weise sichern und die darin enthal¬ 
tenen Ideen später wieder aufgreifen. Wichtig ist die syste¬ 
matische Namensgebung der Daten-Files. Empfohlen wird 
folgendes Bezeichnungsschema: 

3 Zeichen Bearbeitername (Abkürzung) 

6 Zeichen Bearbeitungsdatum 

7 Zeichen Aufgaben- oder Bauteilbezeichnung. 

Maximal sind 16 Zeichen pro Name zulässig. Ein festes 
Bezeichnungssystem ist zwar im Programm PED noch nicht 
vorgesehen, aber zur Verwaltung eines schnell wachsenden 
Datenbestandes sollte man von Anfang an ein festes 
Bezeichnungssystem verwenden. Dazu dient unter anderem 
die Einteilung in Baugruppen, an die Sie sich auf jeden Fall 
gewöhnen sollten. 

So, das wars, jetzt bleibt uns nur noch, Ihnen viel Vergnü¬ 
gen mit PED zu wünschen. 


(Prof. H. W. Melzer/og) 


Eingabehinweise 

Da der PED zu umfangreich ist, um mit dem MSE für den 
C16 eingegeben zu werden, war es nötig, ihn vor dem 
Abdruck zu teilen. Verfahren Sie bei der Eingabe deshalb 
wie folgt. 

1. Geben Sie Listing 1 »PED« ein und speichern Sie es. 
Für Datasette ändern Sie in den Zeilen 30 und 40 die 
Ladeadresse in 1. 

2. Listing 2 »MZ« eintippen und speichern. 

3. Denn geben Sie die Listings 3 und 4, die beiden Teile 
des Hauptprogramms, mit dem MSE ein und speichern 
diese mit den Namen »PED 1« und »PED 2«. Wenn Sie mit 
der Datasette arbeiten, sollten Sie für diese beiden Teile 
eine andere Kassette nehmen. Die beiden Einzelteile wer¬ 
den später nicht mehr gebraucht. 

4. Fügen Sie die Listings 3 und 4 zusammen. Dazu 
geben Sie bitte folgende Befehle ein: 


LOAD "PED 1" , 8,1 
MONITOR 
> 07F8 80 
T 3000,69B0,7000 
L "PED2",8 
S " C/PED " , 8,4001, A9B0 


<RETURN> 
<RETURN> 
<RETURN> 
<RETURN> 
<RETURN> 
<RETURN> 


Für Datasette ändern Sie die Geräteadressen jeweils in 1. 

Danach können Sie, wenn Sie wollen, die Programme 
»PED 1« und »PED 2« löschen, sie werden nicht mehr 
gebraucht. 





Bild 17. Alle Menüpfade auf einen Blick. 
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GRAFIK-LISTING 


1€> COLDR 4,6,4: COLOR 0,1: COLOR 1,2,6 
14 PRINT "<CLR,2DQWN,4SPACEJPED—LADEZEIT 154 
1 1:20/1551 0:30" 

20 GRAPHIC 1: GRAPHIC 0 

30 IF PEEK < 4144 > < >169 THEN LOAD "MZ",8,1 
40 IF PEEK <16385)037 THEN LOAD "C/PED" ,8 

50 run Listing 1. Das Ladeprogramm »PED« 


Name I ml 1030 17c7 


1030 


«9 

00 

85 

6c 

85 

6d 

85 

66 

6f 

1038 


a9 

20 

85 

6« 

a9 

lc 

85 

65 

7d 

1040 


a9 

80 

85 

70 

a9 

5a 

Bd 

28 

Bd 

1048 


08 

a9 

04 

Bd 

26 

08 

d8 

a5 

29 

1050 


70 

ae 

26 

0B 

a0 

00 

20 

ba 

a2 

1058 


ff 

98 

20 

bd 

ff 

20 

C0 

ff 

67 

1060 


ti 6 

70 

20 

c9 

ff 

a9 

08 

20 

2d 

1068 


d2 

ft 

20 

84 

10 

20 

b3 

11 

c5 

1070 


20 

40 

11 

20 

b4 

10 

a9 

0f 

09 

1078 


20 

d2 

ff 

20 

cc 

ff 

aS 

70 

49 

1080 


20 

c3 

ff 

60 

a2 

00 

a0 

00 

3a 

1088 


c8 

d0 

fd 

eB 

d0 

f 8 

60 

a9 

fe 

1090 


B0 

85 

61 

a 9 

0B 

85 

62 

a0 

dB 

1098 


00 

bl 

61 

f0 

17 

20 

ba 

10 

65 

10a0 


bl 

61 

f0 

10 

Bc 

18 

08 

20 

2a 

10aB 


d2 

ff 

ac 

18 

08 

cB 

d0 

fe 

94 

10b0 


e6 

62 

d0 

ec 

a9 

0d 

20 

d2 

c2 

I0b8 


ff 

60 

a9 

80 

ae 

28 

08 

f0 

90 

10C0 


f 8 

8e 

18 

08 

20 

d2 

ff 

ae 

fc 

10C0 


1B 

08 

ca 

d0 

f 4 

60 

a2 

06 

9a 

10d0 


bd 

11 

08 

18 

65 

6d 

85 

61 

b6 

10d8 


bd 

19 

08 

65 

6e 

85 

62 

a0 

ae 

10E0 


00 

bl 

61 

9d 

00 

08 

ca 

10 

50 

10e8 


e7 

60 

a9 

80 

85 

63 

a9 

08 

a4 

10f 0 


B5 

64 

20 

ce 

10 

20 

86 

1 1 

c7 

10f 8 


20 

cd 

11 

20 

2a 

ii 

e6 

6a 

e3 

1100 


a5 

6a 

c9 

28 

d0 

ec 

a0 

00 

49 

1108 


98 

aa 

91 

63 

84 

6a 

30 

40 

65 

me 


a9 

B0 

85 

63 

88 

bl 

63 

c9 

fe 

1118 


80 

d0 

0e 

8a 

91 

63 

98 

d0 

0d 

1120 


f 3 

c6 

64 

a5 

64 

c9 

08 

10 

19 

1120 


eb 

60 

a0 

07 

b9 

08 

08 

91 

6b 

1130 


63 

88 

10 

f 8 

a5 

63 

18 

69 

a3 

1138 


08 

85 

63 

90 

02 

e6 

64 

60 

97 

1140 


a5 

6c 

c5 

65 

30 

0a 

d0 

f 7 

C0 

1148 


a5 

66 

d0 

04 

a9 

04 

85 

6f 

85 

1150 


20 

ea 

10 

20 

Bf 

10 

e6 

6c 

db 

1158 


e6 

6b 

a2 

01 

a9 

09 

c5 

6b 

8d 

1160 


da 

02 

86 

6b 

bd 

10 

08 

e4 

87 

1168 


6b 

38 

to 

11 

e9 

01 

9d 

10 

8b 

1170 


08 

b0 

03 

de 

18 

08 

e8 

e0 

94 

1178 


08 

d0 

e9 

f 0 

c3 

e9 

39 

de 

af 

1100 


18 

08 

d0 

ea 

f0 

eB 

a2 

08 

lf 

1188 


a9 

80 

9d 

07 

08 

ca 

d0 

f a 

ca 

1190 


a9 

01 

85 

69 

bd 

00 

08 

f0 

26 

1190 


12 

a0 

07 

7e 

00 

0B 

90 

08 

lf 

1 la0 


b9 

08 

08 

05 

69 

99 

08 

08 

94 

1 la8 


88 

10 

f0 

06 

69 

eB 

e4 

6f 

85 

1 lb0 


c!0 

e2 

60 

a2 

00 

Ba 

aB 

86 

62 

l iba 


6a 

86 

72 

86 

6b 

9d 

1 1 

08 

cb 

11C0 


98 

9d 

19 

08 

e8 

8a 

e0 

07 

e3 

1 lcB 


d0 

f 3 

86 

6f 

60 

a2 

06 

18 

85 

Ud0 


a9 

00 

7d 

1 1 

08 

9d 

n 

08 

cl 

1 ld8 


90 

03 

fe 

19 

00 

ca 

10 

ef 

c4 

1 le0 


60 

00 

00 

00 

00 

00 

00 

00 

41 

lleB 


00 

00 

00 

00 

00 

00 

00 

00 

e9 

1H0 


00 

00 

00 

00 

00 

00 

00 

00 

fl 

llfB 


00 

00 

00 

00 

00 

00 

00 

00 

f 9 

1200 


00 

00 

00 

00 

00 

00 

20 

91 

a4 
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85 
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00 

bl 

bf 
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c9 

ce 
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05 

20 

61 

13 

5c 

1250 


d0 
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1B 

a5 

61 

69 

07 

85 

5d 

1258 


26 

a5 

62 

69 

00 

05 

27 

20 

20 

1260 


61 

13 

aB 

8a 

69 

09 

Bd 

02 

df 

1268 


12 

98 

69 

00 

8d 

03 

12 

30 

9b 

1270 


07 

bl 

61 

8d 

05 

12 

c8 

bl 

cl 

1278 


61 

Bd 

04 

12 

0e 

04 

12 

2e 

89 
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05 

12 

ad 

04 

12 

85 

6f 

ad 

el 

1280 


05 

12 

85 

70 
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04 

12 
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ab 

1290 


05 

12 
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01 

85 
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ad 

02 

9f 
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85 

14 
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00 

12 

85 
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ad 

03 

12 

85 
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01 

9d 
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12 

85 
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ad 

02 
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04 

7c 

12b0 


12 

85 

63 

ad 

03 

12 

6d 

05 

94 

12b8 


12 

85 

64 

a0 

00 

bl 

14 

30 

fB 


12c0 


42 

85 

69 

c8 

bl 

14 

Bä 

28 

5a 

12c8 


a5 

26 

85 

61 

a5 

27 

85 

62 

7c 

12d0 


20 

20 

13 

,2. 

14 

69 

02 

85 

19 

12d8 


14 

90 

02 

e6 

15 

c5 

6a 

d0 

5d 

12e0 


da 

a5 

13 

c5 
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d0 

d4 

c6 

a9 
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ff 
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55 
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02 

12 

18 
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bf 

Bd 

02 
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12 

ad 

03 

12 

65 

70 

Bd 

03 

fa 
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12 
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93 
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14 

18 

03 

1308 
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14 
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85 
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•5 

15 

83 

1310 
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70 
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ff 
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de 

1320 
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00 

bl 

61 

CS 

28 

77 

1328 


f0 

14 

c8 

<10 

03 

e8 

b6 

62 

46 

1330 


cB 

c4 

65 

d0 

ef 

f 4 

66 

d0 

2f 

1338 


eb 

a9 

ff 

aa 

d0 

0« 

88 

bl 

50 

1340 


61 

cB 

c5 

69 

d0 

e4 

BB 

Ba 

0f 

1348 


4a 

aa 

98 

6a 

a 0 

01 

91 

63 

7a 

1350 


88 

8a 

91 

63 

a5 

63 

18 

69 

97 

1358 


02 

85 

63 

90 

03 

ia 

e6 

64 

5d 

1360 


60 

18 

30 

02 

bl 

61 

65 

61 

b3 

1368 


aa 

cB 

bl 

61 

65 

62 

85 

62 

53 

1370 


86 

61 

60 

86 

61 

60 

08 

00 

c9 

1378 


00 

04 

00 

06 

00 

46 

e4 

0c 

19 

1380 


ff 

ff 

ff 

ff 

ff 

+ 5 

ff 

ff 

2e 

1388 


ff 

ff 

ff 

ff 

ff 

ff 

ff 

f 5 

72 

1390 


ff 

ff 

ff 

ff 

ff 

ff 

ff 

ff 

Bf 

1398 


ff 

ff 

ff 

ff 

ff 

ff 

ff 

11 

b9 

13a0 


00 

00 

00 

00 

00 

00 

00 

00 

al 

13a8 


00 

00 

00 

00 

00 

00 

00 

00 

a9 

13b0 


00 

00 

00 

00 

00 

00 

00 

00 

bl 

13b8 


00 

00 

00 

00 

00 

00 

00 

00 

b9 

13c 0 


75 ff ff ff ff ff • 

ff 

35 

13c8 


ff 

ff 

ff 

71 

ff 

ff 

ff 

ff 

f 5 

13d0 


f 5 

ff 

ff 

ff 

ff 

ff 

ff 

ff 

c5 

13d8 


ff 

ff 

ff 

ff 

ff 

ff 

ff 

11 

f 9 

13e0 


00 

00 

00 

00 

00 

00 

00 

00 

el 

13eB 


00 

00 

00 

00 

00 

00 

00 

00 

e9 

13f 0 


00 

00 

00 

00 

00 

00 

00 

00 

fl 

13f 8 


00 

00 

00 

00 

00 

00 

00 

00 

f 9 

1400 


a9 

28 

Bd 

2e 

03 

a9 

14 

Bd 

cf 

1408 


2f 

03 

a9 

00 

Bd 

30 

03 

a9 

dd 

1410 


16 

Bd 

31 

03 

•a 

00 

b9 

22 

cf 

1418 


14 

C0 

20 

d2 

ff 

c9 

00 

d0 

e3 

1420 


f 5 

60 

0d 

4f 

4b 

0d 

00 

00 

90 

1428 


85 

93 

a9 

00 

85 

90 

a5 

ae 

b2 

1430 


c9 

07 

f0 

03 

4c 

50 

f0 

20 

65 

1438 


ib 

e3 

20 

60 

fl 

20 

c8 

14 

c4 

1440 


a5 

93 

85 

e8 

a9 

00 

85 

93 

05 

1448 


20 

el 

14 

a9 

b5 

2 a 

ac 

17 

d0 

1450 


a9 

2a 

20 

fb 

14 

a0 

63 

20 

aa 

1458 


ca 

eb 

a0 

M 

b9 

32 

03 

20 

b9 

1460 


d2 

ff 

cB 

C0 

10 

d0 

f 5 

a0 

ld 

1468 


00 

c4 

ab 

f 0 

17 

Bd 

3f 

ff 

ae 

1470 


bl 

af 

8d 

3e 

ff 

d9 

32 

03 

c2 

1478 


d0 

03 

cB 

d0 

ec 

c9 

3f 

d0 

d2 

1480 


c7 

c8 

d0 

e5 

a5 

eB 

85 

93 

7b 

1488 


20 

89 

fl 

a5 

2b 

85 

5f 

a5 

45 

1490 


2c 

05 

60 

a5 

ad 

f0 

0a 

ad 

31 

1498 


43 

03 

85 

5f 

ad 

44 

03 

85 

be 

14a0 


60 

18 

ad 

45 

03 

65 

5f 

85 

04 

14a8 


61 

ad 

46 

03 

65 

60 

85 

62 

06 

14b0 


a9 

4f 

20 

ac 

17 

ad 

42 

03 

Bc 

14b8 


30 

05 

a9 

b5 

20 

ac 

17 

a9 

a3 

14c0 


c5 

20 

fb 

14 

18 

4c 

f0 

14 

e7 

14c8 


20 

64 

e3 

20 

Bd 
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a9 

00 

b6 

14d0 


8d 
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ff 
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ff 

8d 
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ff 

88 

14d8 


a9 

10 
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09 

ff 
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85 
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85 
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85 
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09 
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85 
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15 
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15 

a5 

93 

d0 

0a 

a5 

ff 

46 
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Bd 

3f 

ff 
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Bd 
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ff 

0a 
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20 
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a5 

ff 

0d 
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Bd 
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ff 

dl 
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ff 
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dl 

15 
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15 

32 
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15 
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02 
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20 
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15 
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13 
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c5 
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dB 
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fl 
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Name 

1 
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3000 69b0 

3308 


54 

45 

2f 

4c 

49 

4e 

49 

45 

0b 

3620 


2d 

7d 

42 

7b 

13 

7d 

c8 

7a 

41 











— 

3310 


4e 

3e 

e7 

0a 

20 

47 

45 

4c 

a2 

3628 


9f 

77 

b0 

6a 

dd 

67 

15 

93 

95 

3000 


02 

1* 

05 

b3 

e0 

35 

Bl 

*3 

e* 

3318 


4f 

45 

53 

43 

48 

54 

e0 

48 

82 

3630 


41 

4b 

54 

55 

45 

4c 

4c 

45 

49 

3008 


33 

02 

lf 

05 

bB 

e0 

35 

81 

0f 

3320 


b0 

60 

32 

b0 

d2 

a0 

26 

a0 

e* 

3638 


52 

20 

46 

49 

4c 

45 

4e 
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00 
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e9 
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02 
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05 

b7 
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35 

86 
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12 

11 

92 

b0 

a4 

09 

e0 

35 

*e 

3640 


4d 

45 

3a 

20 

3c 

a0 

24 

3e 

98 
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a0 

35 

b0 

05 

lf 

05 

a0 

53 

63 
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*0 

35 

b0 

04 

52 

73 

5c 

*0 

8b 
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e7 

24 

11 

52 

45 

54 

55 

52 

cl 

3020 


d2 

81 

e9 

20 

02 

i* 

05 

a6 

ac 
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35 

92 

bl 
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09 

02 

52 

73 

BB 

3650 


4e 

2c 
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4e 

45 

55 

45 

4e 

37 
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20 

d2 
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*9 

2d 

02 

1* 

05 

b8 

3340 


56 

b0 

60 

55 

a0 

25 

a0 

55 

31 

3658 


20 

4o 

41 

4d 

45 

46 

20 

4f 

7f 

3030 


a6 

2d 

d2 
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e9 

2« 

02 

1* 

*8 

3348 


11 

a0 

55 

a4 

07 

a0 

35 

02 

e2 
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45 
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20 

5B 

20 

45 

49 

0e 

3038 
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d2 
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e9 

45 

02 
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3350 


52 

73 
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a0 

55 
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d0 
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dB 
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4e 

47 

45 
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45 

4e 

3e 

50 

54 
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lf 

04 
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02 

*3 
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32 
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da 
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e9 

u 

3c 

30 

59 

53 

a0 

59 

6a 

3048 


81 

e9 
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05 

0C 

92 

a6 

30 

bb 
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a0 
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u 

92 

a0 

56 

Be 

e4 

*a 

3678 


80 

02 

52 

75 

4c 
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59 

68 

3e 
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02 

0c 

52 

6* 

b6 

92 


40 

de 

3360 


09 

13 

19 

73 

Bb 

92 

bl 

a4 

0d 

3680 


03 

i* 

06 

30 

59 

60 

24 

a0 

19 

3058 


17 

*0 

35 

b0 

02 

lf 

08 

a0 
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3370 


09 
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35 
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e0 
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*0 
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3060 


39 

bl 

07 
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a0 

35 

bl 

21 

3378 


a0 

55 

1 1 

a0 

35 

a0 

55 

a4 

12 
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ab 

b0 

04 

52 

75 

4c 

a0 
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e4 

07 

b0 

ea 

4b 

•0 

40 

62 

53 

45 

52 

55 

4e 

63 

6f 61 

X 

a 0 

25 

01 

lf 

06 

a0 

4M 

eB 

e0 

3c 

f 4 

41 

50 

a 0 

50 

6f 69 

X 

25 

ld 

a 0 

36 

a0 

53 

02 

SB 

69 

22 

21 

d4 

e7 

0b 

ff 

6f 71 

X 

a0 

40 

aß 

2 a 

bl 

MH 

aß 

53 

23 

41 

52 

54 

50 

55 

ld 

6f 79 

X 

e4 

0b 

aB 

40 

a4 

0/ 

8e 

02 

d4 

3e 

b0 

d2 

b2 

a 0 

f 7 

6f 81 

1 

50 

liß 

e 0 

4b 

a 0 

40 

aß 

25 

ac 

92 

•4 

lb 

e4 

lf 

08 

6f 89 

3 

01 

lf 

06 

aß 

40 

«0 

25 

ld 

89 

3c 

f 4 

41 

50 

92 

7b 

6f 91 

8 

a 0 

3d 

ea 

39 

a7 

0c 

00 

a6 

57 

13 

e7 

09 

11 

45 

92 

6f 99 

I 

20 

.10 

46 

b2 

07 

09 

07 

eB 

90 

55 

4e 

4b 

54 

3e 

d5 

6fal 

8 

55 

a 0 

55 

aB 

39 

0/ 

e 0 

40 

80 

aB 

12 

11 

92 

92 

94 

6fa9 

: 

a 0 

40 

2e 

e0 

53 

a0 

53 

a6 

e6 

13 

92 

a4 

lf 

3c 

bc 

6fbl 

8 

00 

07 

aß 

40 

17 

81 

4d 

Bl 

9b 

92 

a4 

13 

53 

13 

03 

6fb9 

3 

31 

a6 

30 

07 

d2 

b0 

■0 

35 

cb 

47 

02 

58 

b0 

a4 

d3 

6fcl 

8 

01 

fd 

33 

02 

lf 

08 

a0 

53 

a9 

lf 

09 

bl 

a4 

lf 

34 

6fc9 

X 

d2 

92 

33 

cl 

81 

a6 

9d 

33 

13 

09 

07 

26 

e0 

36 

47 

6f d 1 

8 

02 

lf 

06 

bl 

0e 

e0 

35 

Bl 

da 

b0 

a4 

13 

09 

bl 

19 

6fd9 

: 

e9 

3e 

02 

lf 

05 

b6 

ea 

35 

3a 

a4 

13 

09 

07 

26 

ea 

6f el 

3 

01 

e9 

3c 

02 

lf 

05 

b5 

e0 

59 

b2 

0 a 

e 0 

2 c 

b0 

18 

6fe9 


35 

81 

bd 

33 

02 

lf 

05 

b2 

47 

04 

lf 

07 

•fl 

2 c 

cf 

6ff 1 


e 0 

35 

81 

fl 

33 

02 

lf 

05 

d4 

b0 

a4 

lf 

b0 

05 

al 

6f f 9 


b4 

e 0 

35 

81 

a6 

91 

33 

02 

63 

a4 

2 c 

lf 

b0 

b0 

a4 

a4 

lf 

lf 

b0 

ee 

6d 

Listing 4. 

»PED 2«, 

der zweite Teil 

a0 

0 a 

lf 

2c 

e 0 

07 

aa 

32 

a0 

07 

b0 

32 

e 0 

a4 

0e 

a9 

2c 

c4 

des Hauptprogramms (Schluß). 
Beachten Sie bitte 
die Eingabehinweise. 




122 


SONDERHEFT 14 













C16 


GRAFIK-LISTING 



Apfelmännchen 


Die Grafiken, die sich aus der Mandelbrotmenge 
ergeben, speziell die Apfelmännchen, gibt es nun 
auch auf dem C16. Eine Speichererweiterung ist 
dafür nicht erforderlich. 

E igentlich ist es kaum zu glauben. Obwohl beim C16 bei 
eingeschalteter Grafik nur noch 2 KByte zum Program¬ 
mieren bleiben, kann auch er die chaotischen Bilder der 
Apfelmännchen berechnen. Ein paar Tricks waren dazu aller¬ 
dings nötig. 

1) Der Maschinenteil liegt im Farbspeicher der Multicolor- 
grafik (7500 bis 8107 dezimal), was bedeutet, daß beim Auf¬ 
bau des Bildes bunte Quadrate erscheinen. Falls man die 
Grafik im Hauptprogramm trotzdem anschauen will, wählt 
man den Programmteil »Bild ansehen«. Dabei wird der Farb¬ 
speicher mit einer FOR-NEXT-Schleife (immerhin 1 KByte) 
beschrieben. Nun kann man das Bild anschauen, aber dafür 
ist der Maschinenteil auch »weg« (überschrieben). Damit der 
Maschinenteil wieder in den Speicher kommt, wird er nach¬ 
geladen, was jedoch bei der Datasette zu langen Wartezeiten 
führt. 

2) Der Programmteil »Ausschnitt« mußte völlig entfallen 
(auch wegen der fehlenden Sprites). 

3) Das Programm mußte in zwei Teile aufgeteilt werden 
(eine für die Berechnungen, laden, speichern, Directory und 
eine für Farben einstellen und Bewegungseffekt). 
Beschreibung der Menüpunkte des ersten Teilpro¬ 
gramms: »APFELMANN« 

1) Neue Werte: Entspricht Version für C 64. Das Programm 
kann nur durch einen Reset angehalten werden. (RUN/STOP- 
Taste halten und Resetknopf drücken). Es erscheinen wäh¬ 


rend des Bildaufbaus bunte Quadrate. Hier liegt kein Fehler 
vor, der Farbspeicher enthält ja das Maschinenprogramm. 

2) Laden: Bilder können von Datasette oder Diskette gela¬ 
den werden. Die Endung »—«ist dabei nicht mitanzugeben. 
Nach dem Ladevorgang werden die entsprechenden Para¬ 
meter angezeigt. 

3) Speichern: Ein fertiges Bild kann auf Datasette oder Dis¬ 
kette gespeichert werden. Dabei wird an den Filenamen ein 
» — «angehängt. Zusätzlich werden die Parameter mitgespei¬ 
chert. 

4) Bild ansehen: Das im Speicher stehende Bild wird in den 
fest vorprogrammierten Farben angezeigt. Farben lassen 
sich dabei nicht ändern. (Will man die Farben verändern, muß 
man das Programm »DISPLAY« benutzen.) Bevor man wieder 
ins Hauptmenü gelangt, wird der Maschinenteil nachgela¬ 
den. Kassettenbesitzer müssen sich deshalb die Zahl des 
Bandlaufwerks merken, die vor dem Maschinenteil steht. 
(Filename = »APFELROUTINEN«). 

Ausschnitt selbst definieren 


5) Directory: Nach Aufruf dieser Funktion wird ein Ver¬ 
zeichnis aller Apfelmännchen auf einer Diskette gelistet. 

Da der Menüpunkt Ausschnitt entfallen mußte, hier eine 
Anleitung, wie man die Parameter für einen entsprechenden 
Ausschnitt bekommt. Am besten geht man von dem Grund¬ 
bild aus (-.7 / 2.1 / -1 /1 / 30). 

Dann teilt man den Bildschirm in Gedanken auf. (Statt x (0 
bis 159)/y(0 bis 199) wird x(-0.7 bis 2.1) und y(-1 bis 1). Jetzt 
sucht man sich den Teil des Bildes aus, den man genauer 
ansehen möchte. Nun stellt man sich eine x- und y-Skalierung 
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vor, die den Parametern des Bildes, von welchem man den 
Ausschnitt sehen möchte, entsprechen. (Hier x-Achse von 
-0.7 bis 2.1 und y-Achse von -1 bis 1.) Jetzt kann man in 
Gedanken die Werte für den Ausschnitt ablesen. Diese Werte 
können dann in dem Menüpunkt »Neue Werte« eingetragen 
werden. Natürlich ist dieses Verfahren sehr ungenau, aber es 
funktioniert. 

Beschreibung der Menüpunkte des zweiten Teilpro¬ 
gramms: »DISPLAY« 

1) Laden: Bilder von Datasette oder Diskette können unter 
Angabe des Namens geladen werden. Dabei ist »—« nicht 
mitanzugeben. 

2) Farben einstellen: Nach Wahl dieses Menüpunktes 
erscheint ein schwarzer Bildschirm, da noch keine Farbein¬ 
stellungen erfolgt sind. Nun kann man mit den Tasten < 2 >, 
<3>, <4> die Farben der drei Zeichenfarben, mit <1 > 
die Hintergrundfarbe und mit <5> die Rahmenfarbe verän¬ 
dern. Beim Druck auf die Taste < + > wird die Helligkeit der 
Farbzone erhöht, die zuletzt in der Farbe mit dem Druck auf 
die Tasten <1 > bis <5> verändert wurde. Die <->-Taste 
senkt die Helligkeit der jeweiligen Farbzone. Mit der Leertaste 
gelangt man wieder ins Hauptmenü. 


3) Effekt: Durch zyklisches Vertauschen der Farben, die im 
Menüpunkt »FARBEN EINSTELLEN« ausgewählt wurden, 
entsteht der Eindruck eines bewegten Bildes. Mit der Leerta¬ 
ste kommt man ins Hauptmenü. 

Programmtechnische Besonderheiten des Maschinen¬ 
spracheteils 

1) Es wird das sogenannte chaining zum Nachladen des 
Maschinenteils benützt (Zeile 9). 

2) Es wird der USR-Befehl zur Übergabe der Parameter 
(Fließkommazahlen) an das Maschinenprogramm und an 
Basic benutzt. 

3) Das Laden eines Bildes erfolgt nicht mit dem LOAD- 
Befehl. Durch POKE-Befehle werden die Parameter für die 
Betriebssystemroutine LOAD übergeben. Dann wird die Rou¬ 
tine direkt mit dem SYS-Befehl angesprungen. Dieses Vorge¬ 
hen bietet folgende Nachteile: 

- Nach dem Laden wird mit dem Programm normal fortgefah¬ 
ren und nicht, wie beim LOAD-Befehl, erneut gestartet. 

- Obwohl die nachzuladende Grafik länger als das Basic- 
Programm ist, wird kein OUT OF MEMORY ERROR ausge¬ 
geben. 

- Das gleiche gilt für den SAVE-Befehl. 


5 PRINT CHR*(14) CHR*<8> CHR*(147);: POKE 12 
82,29 

6 IF PEEK (1630) Ol THEN GRAPHIC 3,1: GRAPHIC 

0: POKE 1630,1 

7 IF PEEK<1633) =0 THEN INPUT "ICLR,SYNTH.:13 
03-,K.tSYNTH. : 1323-ASS. / {SYNTH. : 130>a<SYNTH. : 1 
32>ISK";D*: IF D*<>"K" THEN POKE 1633,8: G 
0T0 9 

B IF PEEK(1633)=0 THEN POKE 1633,1 

9 IF A=0 THEN A=l: LOAD "APFELROUTINEN",PEEK 
(1633),1 

10 POKE 55,70: POKE 56,29: CLR 
15 FOR 1=1 TO 8: KEY I,"": NEXT 

20 C8=29: XI=64: XA=69: YI=74: YA=79: TM=84+ 
3*4096+15*256 

100 POKE 1281,76: IF PEEK<1634)=1 THEN POKE 
1634,0: GOTO 9 

110 PRINT " {CLR>" TAB (12) “**** HEXU.E. ****{3D 
OWNI" 

120 PRINT "(1){9SPACETBEUE BERTE 
130 PRINT "C2D0WNX2) C9SPACE>iADEN 
140 PRINT "{2D0WN}(3)<9SPACE>SPEICHERN 
150 PRINT "(2DOWN) <4> C7SPACE) .31LD ANSEHEN 
160 PRINT " I2DOWN3(5) <9SPACE>£IRECT0RY 
170 PRINT "C4DOWN,12SPACE,RVSON,SYNTH.:130>£ 
ITTE ÜAEHLEN 

180 GET KEY A*: V=VAL(A*>: IF V<1 OR V>5 THE 
N 180 

190 ON V GOSUB 1000,2000,3000,4000,5000 
200 GOTO 100 

999 END 

1000 INFUT "<CLR,DOWN}LINKER SAND<2SPACE>";L 
I 

1010 INPUT "IDOWNJBECHTER SAND ";RE 
1020 INPUT "CDOWNIÜNTERER SAND "; UN 
1030 INPUT "{DOWNJflBERER SAND<2SPACE>" ; OB 
1035 INPUT " {2DQWNIÖAXIMALE HEFE"; TM’/. 

1037 IF TM7.<5 OR TM7.>245 THEN 1035 
1040 POKE 7501,XI: US=USR(LI) 

1050 POKE 7501,XA: US=USR(RE> 

1060 POKE 7501,YI: US=USR(UN) 

1070 POKE 7501,YA: US=USR(OB) 

1080 POKE TM,TM7. 

1081 INPUT "FERTIGES £ILD SPEICHERN (J/N)";S 
P*: IF 5P*="N" THEN 1090 

1082 INPUT "{CLR >£ILENAME";NA*: PRINT "{CLR> 


1090 SYS 8044 

1095 IF SP*<>"N" THEN GOSUB 3010 
1100 RETURN 

2000 INPUT "{CLR}EILENAME";NA*: PRINT ”{CLR> 

2005 NA*=NA*+" {17SPACE>": NA*=LEFT*(NA*,15) + 

2006 *3-3UB 10000 

2010 POKE 174,PEEK(1633): POKE 171,16: POKE 
176,12: POKE 175,0: POKE 173,1: SYS 615 
20 

2020 POKE 1281,76+7: POKE 1282,CB 
2030 POKE 7508,XI: LI=USR(0) 

2040 POKE 7508,XA: RE=USR(0> 

2050 POKE 7508,YI: UN=USR(0) 

2060 POKE 7508,YA: OB=USR(0) 

2070 PRINT " tCLR,3D0WN>i.INKER SAND<2SPACE>" 5 
LI 

2080 PRINT "{DOWNTSECHTER £AND "; RE 
2090 PRINT "{DOWNJüNTERER SAND ";UN 
2100 PRINT "{DOWNJflBERER SANDC2SPACE>";OB 
2110 PRINT "{2D0WNJÜAXIMALE IIEFE" PEEK(TM) 
2120 GOSUB 20000: RETURN 
3000 INPUT " <CLR>£.1 LENAME"; NA* 

3010 NA*=NA*+"U7SPACE>": NA*=LEFT*(NA*,15)+ 
"+": GOSUB 10000 

3020 POKE 178,0: POKE 179,32: POKE 157,0: PO 
KE 158,64: POKE 174,PEEK(1633): POKE 17 
5,0 

3025 POKE 176,12: POKE 171,16: SYS 61B60 
3030 GOSUB 20000: RETURN 

4000 PRINT "ICLRilURUECK INS flENUE MIT DER fl 
EERTASTE.» 

4010 GOSUB 20000: PRINT "{2D0WN,SYNTH.:130>S 
ITTE WARTEN" 

4030 FOR 1=7168 TO B168: POKE 1,6: NEXT : GR 
APHIC 3 

4040 GET KEY A*: IF A*=" " THEN GRAPHIC 0: P 
OKE 1634,1: RETURN : ELSE 4040 
5000 PRINT "<CLR >"5 

5010 DIRECTORY "???????????????<-": GOSUB 200 
00: RETURN 

10000 PRINT "{HOME,WHITE,17SPACE,BLACK >" 
10010 FOR 1=0 TO 15: POKE 3072+I,ASC(MID*(NA 
*,1+1,1)): NEXT : RETURN 
20000 PRINT "{DOWNJflITTE EINE IASTE DRUECKEN 
": GET KEY A*: RETURN 



Listing 1. »APFELMÄNNCHEN«, das Hauptprogramm 
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Diese Programmtechnik ist in den Zeilen 2010 und 3020 
bis 3025 zu finden. 

4) Leider kann das Maschinenprogramm nur eine Tiefe bis 
245 erlauben, da es sich sonst selber überschreiben und 
abstürzen würde. 

Programmtechnische Besonderheiten im Programm 
»DISPLAY« 

1) Laden, wie oben 

2) Es befindet sich in den Zeilen 2040 bis 2100 ein 
Maschinenprogramm. Dieses Programm ist im wesentlichen 
eine 16-Bit-Schleife, die den Farbspeicher oder den 
Luminanz- (Helligkeits-)speicher mit einem Wert beschreibt, 
der von Basic gePOKEt ist. Dieses Maschienenprogramm 
liegt im Bereich 1632 bis 1687 (freies RAM für Sprachsyn¬ 
thesizer). 

3) Da nur 2 KByte Speicher zur Verfügung stehen, werden 
die DATA-Zeilen (2040 bis 2100) vom Programm selbst 
gelöscht, nachdem das Maschinenprogramm eingelesen 
wurde. Normalerweise ist so etwas nicht möglich, da der 
DELETE-Befehl nur im Direktmodus verwendet werden kann. 
Durch einen POKE-Befehl täuscht man dem Basic-Inter- 
preter aber vor, daß er sich im Direktmodus befindet. Aller¬ 
dings würde nun das Programm abgebrochen. Also muß der 
Tastaturpuffer mit den Befehlen programmiert werden, die 
dann das Programm weiterlaufen lassen. 

Dieser Vorgang befindet sich in der Zeile 20. 

4) Obwohl die DATA-Zeilen gelöscht werden, kann es zu 
einem OUT OF MEMORY kommen. Damit das Programm 
weiterläuft, muß die »RUN/STOP«-Taste gehalten und der 
RESET-Knopf gedrückt werden. Dann »X« und »RETURN« 
drücken und schließlich »RUN30« und »RETURN« eingeben. 
Man befindet sich dann im Hauptmenü. 


5) Bei der Funktion EFFEKT kann es zu einem Flimmern 
kommen, da beim Umschalten der Farbwerte nicht auf die 
Position des Elektronenstrahls des Monitors gewartet wird. 
Hinweise zum Eingeben der Programme: 

1) Geben Sie Listing 1 (Apfelmännchen) ein und speichern 
es auf Diskette oder Datasette. 

2) Geben Sie Listing 2 (Apfelroutinen) mit dem MSE ein und 
speichern es ebenfalls. 

3) Als letztes geben Sie Listing 3 (Display) ein und spei¬ 
chern es sofort auf Diskette. Führen Sie vor dem Speichern 
auch keinen Probelauf durch, da es sich zum Teil selbst 
löscht. 

(Ulrich Hesse/og) 
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Name 

t 

apfelroutinen 


ld4c 14a9 

le 0 c 

: 

07 

9e 

20 

91 

a2 

a0 

c7 

20 

ab 

ledc 

: 

9e 

a9 

40 

a 0 

0a 

20 

07 

al 

74 

_ 











lel4 

: 

81 

9a 

20 

bl 

ld 

20 

97 

al 

95 

lee4 

: 

20 

87 

9e 

20 

27 

a6 

a2 

70 

87 

ld4c 

: 

a2 

40 

a 0 

34 

4c 

59 

a 2 

a9 

0c 

lelc 

: 

a2 

30 

a0 

0 a 

20 

59 

a 2 

a 0 

d8 

leec 

3 

a0 

0a 

20 

59 

a2 

4c 

54 

le 

df 

ld54 

. 

40 

a0 

3f 

4c 

22 

a2 

4c 

64 

85 

le24 

t 

04 

b9 

40 

34 

99 

40 

0 a 

b9 

34 

le44 


0e 

02 

0a 

0e 

02 

0a 

0d 

02 

f0 

ldSc 

i 

ld 

4c 

cd 

ld 

4c 

6d 

ld 

4c 

f 4 

le 2 c 

: 

4f 

34 

99 

60 

0a 

00 

10 

41 

96 

le4c 

3 

0 a 

Bd 

02 

0a 

a9 

40 

a0 

0a 

c2 

ld64 

: 

6c 

lf 

4c 

69 

ld 

20 

67 

c5 

9c 

1 e34 

: 

a9 

00 

Bd 

00 

0 a 

0d 

01 

0 a 

66 

1404 

3 

20 

22 

a 2 

a9 

90 

a 0 

0a 

20 

8a 

ld6c 

i 

&0 

60 

60 

a2 

03 

20 

d4 

c5 

79 

le3c 

s 

Bd 

03 

0 a 

a9 

00 

Bd 

02 

0a 

8b 

140c 

S 

9b 

9e 

a2 

40 

a 0 

0a 

20 

59 

35 

ld74 

i 

60 

ad 

00 

0a 

29 

48 

4a 

4a 

04 

1 e44 

3 

a9 

00 

8d 

04 

0a 

a0 

04 

99 

ba 

1414 

X 

a 2 

ee 

03 

0a 

ad 

03 

0a 

29 

9d 

ld7c 

i 

aa 

bd 

75 

lf 

05 

d0 

e0 

bd 

44 

1 e4c 

3 

70 

0 a 

99 

00 

0a 

00 

10 

f 7 

4d 

141c 

3 

03 

f 0 

03 

4c 

44 

le 

0d 

03 

53 

ldB4 

a 

75 

lf 

05 

dl 

ad 

00 

0 a 

29 

7a 

1 e54 

: 

ee 

04 

0a 

ad 

54 

3 i 

cd 

04 

4b 

1424 

X 

0 a 

20 

75 

ld 

ee 

01 

0a 

ad 

ba 

ldÖc 

3 

07 

18 

65 

d0 

05 

d0 

90 

02 

38 

le5c 

s 

0a 

b0 

05 

a9 

00 

4c 

f 4 

le 

a7 

142c 

X 

01 

0a 

c9 

28 

f0 

03 

4c 

3f 

81 

ld94 

: 

06 

dl 

ad 

01 

0 a 

0a 

0a 

0 a 

lc 

1 e64 

8 

a9 

70 

a0 

0 a 

20 

22 

a2 

a9 

a0 

1434 

: 

le 

a9 

00 

Bd 

01 

0« 

a0 

05 

c6 

ld9c 

i 

90 

02 

e6 

dl 

10 

65 

d0 

85 

lc 

1b6c 

: 

70 

a0 

0a 

20 

78 

a0 

a 2 

57 

79 

143c 

8 

b9 

40 

34 

99 

40 

0a 

SB 

10 

af 

lda4 

3 

d0 

90 

02 

e6 

dl 

a0 

00 

ad 

97 

le74 

a 

a0 

00 

20 

59 

o2 

a9 

80 

a0 

02 

lf 44 

a 

f 7 

ee 

00 

0a 

ad 

00 

0 a 

c9 

Ba 

ldac 

| 

02 

0 a 

91 

d0 

60 

a5 

6e 

45 

a9 

le7c 

s 

0 a 

20 

22 

a 2 

af 

80 

a0 

0a 

a8 

1 f 4c 

8 

c8 

f 0 

lb 

a9 

30 

a0 

0a 

20 

49 

ldt>4 

t 

66. 

85 

64 

a5 

61 

60 

a 2 

00 

11 

1 eS4 


20 

78 

a 0 

a 2 

d4 

a 0 

00 

20 

e4 

1454 

3 

22 

a 2 

a9 

60 

a 0 

0a 

20 

07 

27 

Idbc 

2 

a0 

ei 

90 

9d 

00 

08 

c8 

C0 

9c 

le8c 

c 

59 

a2 

a9 

57 

a0 

00 

20 

9b 

4d 

145c 

3 

al 

20 

87 

9a 

a 2 

60 

a 0 

0 a 

87 

ldc4 

3 

04 

d0 

02 

a0 

01 

eB 

d0 

42 

45 

1 e94 

: 

9e 

a5 

61 

c9 

04 

90 

09 

ae 

e5 

1464 

X 

20 

59 

a2 

4c 

3f 

le 

58 

60 

6a 

Idee 

X 

60 

a2 

00 

20 

<14 

c5 

60 

78 

6f 

le9c 

a 

04 

0a 

bd 

00 

08 

4c 

44 

le 

08 

146c 

3 

20 

6 i 

ld 

20 

d3 

ld 

4c 

cd 

82 

1 dd4 

1 

20 

ba 

ld 

a9 

40 

a0 

34 

20 

14 

lea4 

: 

a9 

80 

a0 

0a 

20 

22 

a2 

a9 

eB 

1474 

8 

ld 

00 

20 

40 

21 

80 

22 

C0 

c2 

lddc 

r 

22 

a2 

a9 

45 

a0 

34 

20 

07 

45 

1 eac 

3 

70 

a 0 

0 a 

20 

70 

a0 

a5 

61 

d9 

147c 

X 

23 

00 

25 

40 

26 

80 

27 

C0 

75 

ldefl 


al 

20 

87 

9e 

20 

91 

a2 

a0 

a5 

leb4 

3 

40 

02 

e6 

61 

a9 

60 

a0 

0a 

b4 

1484 

8 

28 

00 

2 a 

40 

2b 

80 

2c 

C0 

28 

Idee 

i 

94 

20 

Bl 

9a 

20 

bl 

ld 

20 

93 

lebe 

3 

20 

07 

al 

20 

87 

9e 

20 

27 

08 

148c 

3 

2d 

00 

24 

40 

30 

00 

31 

C0 

db 

idr4 

B 

97 

al 

a2 

90 

a0 

0., 

20 

59 

a4 

lec4 

: 

a6 

a2 

80 

a 0 

0a 

20 

59 

a2 

3c 

1494 

X 

32 

00 

34 

40 

35 

80 

36 

C0 

Bd 

ldf c 

S 

a2 

a9 

4a 

a0 

34 

20 

22 

a2 

de 

lecc 

: 

a0 

00 

a9 

d4 

20 

22 

a2 

a0 

50 

149c 

X 

37 

00 

39 

40 

3a 

80 

3b 

C0 

40 

1004 

1 

a9 

4f 

*0 

3f 

20 

07 

al 

20 

66 

led4 

: 

00 

a9 

57 

20 

07 

al 

20 

87 

90 

lf«4 

3 

3c 

00 

3e 

f a 

ff 

20 

8d 

17 

35 


Listing 2. »APFELROUTINEN«, der Maschinenspracheteil für schnellere Berechnungen 


3 PRINT CHR$<14> CHR$<8> 

U=16*LU<2) 4-LU <Y) : SYS 1632: GOTO 290 

15 POKE 55,70: FQKE 56,29: CLR 

280 GOTO 300 

20 GOSUB 2000: POKE 129,0: PRINT 11 -CCLR3 RUN30 

290 POP’ 1643,PU: SYS 1663 

": POKE 1319,19: POKE 1320,13: POKE 239,2 

300 IF RE=1 THEN RETURN : ELSE 120 

: DELETE 2000- 

310 GRAPHIC 3: COLOR 0,Cl-f-l ,LU (1) : COLOR 4,C 

30 COLOR 0,2,7: COLOR 1,1: COLOR 4,15,6: PRI 

54-1 , LU (5) 

NT "1CLR1" TAB(13)"•*** flENUE **** 

320 E1=C2: L1=LU<2>: E2=C3: L2=LU<3>: E3=C4: 

40 PRINT "t5D0WNJ<l)<10SPACEJ1ADEN 

L3=LU<4> 

50 PRINT "C2D0WNJ(2)C10SPACE3£ARBEN .EINSTELL 

330 EP=E3: LP=L3: E3=E2: L3=L2: E2=E1: L2=L1 

EN" 

: E1=EP: L1=LP: GET A$: IF A*=" " THEN 3 

60 PRINT " C2D0WNX3) U0SPACE>£FFEKT 

50 

70 PRINT "{4D0WN,13SPACE,SYNTH.:130,RVS0NJ2I 

340 POKE 1643,16*E14-E2: SYS 1632: POKE 1643, 

TTE tiAEHLEN" 

Ll4-16*L2: SYS 1663: COLOR 3,E3-H,L3: GOT 

80 GET KEY A$: A=VAL<A*>: IF A<1 OR A>3 THEN 

0 330 

80 

350 GRAPHIC 0: RETURN 

90 ON A GOSUB 1000,110,310 

1000 INPUT " <CLR>£ILENAME";NA*: INPUT "JtASS. 

100 GOTO 30 

/SISK";10$: IF I0*O"K" THEN 10=8: ELSE 

110 GRAPHIC 3 

10=1 

111 RE-1: FOR 1=1 TO 5« Y=I: GOSUB 210: NEXT 

1005 NA*=NA*4-"U7SPACE>": NA*=LEFT* (NA*, 15) 4- 

: RE=0 

"4-" : PRINT " {HOME,WHITE, 1 BSPACE,BLACK>" 

120 GET KEY A$ 

1006 FOR 1 = 0 TO 15: POKE 30724-1 ,ASC (MID* (NA* 

130 IF A*="l" THEN C1-C14-1 AND 15: Y=1 

,14-1,1)): NEXT 

140 IF A*="2" THEN C2=C2+1 AND 15: Y=2 

1010 POKE 174,10: POKE 171,16: POKE 176,12: 

150 IF A*="3" THEN C3=C3+1 AND 15: Y=3 

POKE 175,0: POKE 173,1: SYS 61520: RETU 

160 IF A$="4" THEN C4=C4+1 AND 15: Y=4 

RN 

170 IF A*="5" THEN 05=054-1 AND 15: Y=5 

2000 FOR 1=1632 TO 1687 

180 IF A*="4-" AND LU (Y) <7 THEN LU (Y) =LU (Y) 4-1 

2010 READ HE$: DE=DEC<HE$>: B=B4-DE: POKE I,D 

190 IF A*="-" AND LU(Y)>0 THEN LU(Y)=LU<Y)-1 

E: NEXT 

200 IF A$=" " THEN GRAPHIC 0: COLOR 0,2,7: C 

2020 IF B07756 THEN PRINT "FEHLER IN DATAS" 

OLOR 1,1,0: RETURN 

: END 

210 IF Y=1 THEN COLOR 0.C14-1 ,LU <Y) 

2030 RETURN 

220 IF Y=4 THEN COLOR 3,044-1 ,LU (Y> 

2040 DATA A9,00,B5,D0,A9,1C,B5,D1 

230 IF Y=5 THEN COLOR 4,054-1 ,LU <Y> 

2050 DATA A0,00,A9,0C,91,D0,E6,D0 

240 IF Y=2 THEN P0=C24-16*C3: POKE 1643,PO: P 

2060 DATA D0,02,E6,D1,A5,D0,C9,FF 

U= 16*LU (Y) 4-LU (3) : SYS 1632: GOTO 260 

2070 DATA A5,D1,E9,1F,90,EC,60,A9 

250 GOTO 270 

2080 DATA 00,85,D0,A9,17,85,D1,A9 

260 POKE 1643,PU: SYS 1663 

2090 DATA 1B,BD,7B,06,20,68,06,A9 

270 IF Y=3 THEN P0=C24-16*C3: POKE 1643,PO: P 

2100 DATA 1F,8D,7B,06,60,FF,FF,FF 



Listing 3. »DISPLAY«, zum Anschauen der Grafiken 

126 HE 
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GRAFIK-LISTING 


Der Computer wertet 
Versuche aus 


Nach experimentellen Versuchen stehen Sie häu¬ 
fig vor dem Problem, die Ergebnisse mathema¬ 
tisch auszuwerten. Mit diesem Programm findet 
Ihr Computer zu experimentell gewonnenen 
Daten die zugehörige Gleichung. 

W enn Sie beispielsweise in einem Versuch Meßwerte 
für einen Fototransistor gewonnen haben, dann wol¬ 
len Sie auch möglichst genau die Kennlinie für dieses 
Bauteil ermitteln. Normalerweise geht man so vor, daß man 
auf Millimeterpapier ein Koordinatenkreuz zeichnet, die Meß¬ 
werte einträgt und dann versucht, die Punkte durch eine 
»glatte« Kurve zu verbinden. Wenn Sie außerdem wissen 
möchten, ob es eine Gleichung gibt, die die experimentellen 
Ergebnisse hinreichend genau darstellt, kommen Sie nicht 
daran vorbei, umfangreiche Berechnungen anzustellen. Eine 
mühsame Arbeit, die der Computer für Sie erledigen kann. 
Mit dem Programm »Approxi 16« (Listing 1) und einem Plus/4 
oder C16 mit Speichererweiterung können Sie die Ergebnis¬ 
se auf dem Bildschirm oder Plotter grafisch darstellen (Bild 1). 

So läßt sich eine Gleichung finden 


Wir wollen Ihnen auch erklären, wie sich aus den Meßergeb¬ 
nissen eine mathematische Gleichung finden läßt. Einige 
Kenntnisse der Mathematik sind dazu allerdings erforderlich. 

Solange es sich bei der gesuchten Gleichung um eine ste¬ 
tige Funktion handelt, läßt sie sich in jedem Fall durch ein 
Polynom ausdrücken. Gleichungen, die man aufgrund expe¬ 
rimenteller Daten ermittelt hat, nennt man »empirische Glei¬ 
chungen«. Eine ideale empirische Gleichung muß die experi¬ 
mentellen Daten hinreichend genau darstellen und gleichzei¬ 
tig einfach genug sein. Das heißt, sie darf nur so wenig Koeffi¬ 
zienten wie möglich enthalten. Diese beiden Bedingungen 
widersprechen sich jedoch. Man muß deshalb oft zwischen 
der Genauigkeit und der Einfachheit der Gleichung entschei¬ 
den. Da es keine Methode gibt, mit deren Hilfe man den Typ 
der rationellsten Gleichung für die Darstellung der gefunde¬ 
nen Daten angeben kann, behilft man sich dadurch, daß man 
die Meßergebnisse grafisch in Form von Punkten darstellt 
und diese durch eine »glatte« Kurve verbindet. Die Kurve soll 
dabei möglichst nahe an den gegebenen Punkten vorbeige¬ 
führt werden und die Abweichungen sollen gleichmäßig posi¬ 
tiv und negativ ausfallen. Aufgrund persönlicher Erfahrungen 
können Sie dann auf den Gleichungstyp schließen. Sobald 
der Gleichungstyp gewählt ist, sind die Koeffizienten zu 
bestimmen. 

Die wahrscheinlichsten Werte der Koeffizienten findet man 
nach der »Methode der kleinsten Quadrate«. Hierbei geht 
man von folgendem aus: 

Gegeben ist eine Anzahl von Datenpunkten. Gesucht wird 
ein sogenanntes »Approximationspolynom« des Grades m 
der Form 

P(x) = a 0 + a,x + a 2 x 2 + ... + a m x m 

wobei der Fehler E l =y l -P(x l ) für i = 1...n ist. Bei der Methode 
der kleinsten Quadrate wird die Summe der Fehler so klein 
wie möglich gemacht. Daraus ergibt sich die Funktion: 


Nr. 

0«»trahlun»t»tntrko F. 

I*» CmU/qn) 

Phot onenstro« I 
ih fmA) 

1 

.030 

.010 

2 


.032 

3 

100 

.003 

4 

.*30 

.111 

3 

.220 

.216 

0 

.380 

.390 

? 

.040 

.304 

8 

1.09P 

1.3 70 


Va(VBX<+C«t2 

*1 > -.020024 
Q « .90810*? 
C-* .49*200 



Bild 1. Die Auswertung der Meßergebnisse für die Kennlinie 
eines Fototransistors (mit dem Commodore-Plotter VC 1520) 


f(a 0 ...a m ) = | £ i (Yi - j S q ajx-j -) 2 

Um das Minimum zu finden, bildet man die erste Ableitung 
für jedes a^ und setzt diese gleich 0. 
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^ = -2 [ fi i ((y, - ,| o 3j x -[) x j) = 0 für k = 0,1.m 

Dieser Ausdruck kann umgeformt werden zu: 

£ y, x-r - £ ( E a, x {) = 0 

1=1 1 1 = 1 i = o 1 1 

Dies ist ein System mit m +1 linearen Gleichungen und den 
Unbekannten a 0 , a,.. a m 

Das Gleichungssystem wird in diesem Programm mit dem 
Gaußschen Algorithmus gelöst. Wie Sie sehen, sind umfang¬ 
reiche Berechnungen notwendig, die Ihnen aber zum Glück 
der Computer abnimmt. 

Wie schon erwähnt, soll die Gleichung möglichst einfach 
sein. Als einfachste funktionale Beziehung erweist sich die 
lineare Funktion y=a+b x. Diese Gleichung kann man unmit¬ 
telbar dann anwenden, wenn die Meßergebnisse mit hinrei¬ 
chender Genauigkeit auf einer Geraden liegen. 

Jedoch kann man auch von einer beliebigen Gleichung, die 
stets die Form g(x,y)=a+b f(x,y) hat, durch Einführung der 
neuen Variablen v=g(x,y); u=f(x,y) zu einer linearen Funktion 
v=a+b u übergehen. Dieses »Linearisierungsverfahren« fin¬ 
det beim Aufsteilen empirischer Gleichungen sehr oft Ver¬ 
wendung. 



Bild 2. Auch beliebige Funktionen können eingegeben und 
grafisch dargestellt werden - bis zu drei Funktionen in einem 
Koordinatenkreuz 


ÜLü* 


Das Programm »Approxi 16« überprüft Polynome bis vier¬ 
ten Grades und fünf Funktionen, die durch Linearisierung auf 
ein Polynom ersten Grades zurückgeführt werden. Damit las¬ 
sen sich fast alle Meßergebnisse grafisch darstellen, egal ob 
die Meßergebnisse nach exponentieller, logarithmischer 
oder nach einer gebrochen-linearen Funktion Zusammen¬ 
hängen. 

Das Programm rechnet für Sie 


Wie Sie sehen, nimmt Ihnen »Approxi 16« alle mathematisch 
aufwendigen Arbeiten ab. Die errechnete Gleichung läßt sich 
dann auf dem Bildschirm oderauf dem Plotter VC 1520 gra¬ 
fisch darstellen. Ebenso können Sie mit diesem Programm 
auch beliebige Funktionen darstellen, sogar bis zu drei Funk¬ 
tionen in einem Koordinatenkreuz (Bild 2 und 4). 

Mit dem POKE-Befehl für die Adresse 65286 wird der Bild¬ 
schirm abgeschaltet. Dadurch wird die Berechnung um zirka 
30 Prozent schneller. Dieser sogenannte »Turbo-Modus« fin¬ 
det zweimal Verwendung. Einmal beim Einfügen der Funktio¬ 
nen ins Programm und zum anderen bei der Suche nach der 
idealen Gleichung für die Meßergebnisse. Bei letzteren kann 
auch ohne Turbo-Modus gerechnet werden (bei eingeschal¬ 
tetem Bildschirm benötigt der Computer mit 5 Meßwertpaa¬ 
ren etwa 34 Sekunden, bei abgeschaltetem Bildschirm nur 
noch 23 Sekunden, um die Funktion mit den kleinsten Abwei¬ 
chungen zu finden). 

So gehen Sie mit dem Programm um 


Das Programm besitzt drei Auswahlmenüs. Die einzelnen 
Funktionen werden entweder durch direktes Drücken einer 
Taste c^sgeführt oder durch Ansteuern mit den Cursortasten 
und < RETURN >. Ebenso werden alle Eingaben mit 
< RETURN > abgeschlossen. Die Berechnung der mathe¬ 
matischen Funktion zu den Meßdaten erfolgt unter dem 
Punkt »Polynomapproximation« des ersten Menüs. Dabei 
müssen Sie die Anzahl der Wertepaare vorgeben und diese 
eingeben. Anschließend können Sie entweder selbst eine 
Funktionsart wählen, oder den Computer die günstigste 
Funktionsart suchen lassen. Dabei wird die Summe der 
Abweichungen (im Quadrat) als Fehler angegeben. Die ein¬ 
zelnen Abweichungen werden quadriert, damit sich positive 
und negative Abweichungen nicht gegenseitig aufheben 
können. 

Ausgabe auf Plotter 


Während der Darstellung der Funktion auf dem Bildschirm ist 
der Bildschirmrahmen schwarz. Ist der Vorgang beendet, 
wird der Bildschirmrahmen blau. Anschließend wartet der 
Computer solange, bis die < RETURN >-Taste gedrückt 
wird. Im Bild 3 sehen Sie ein Beispiel für eine Funktion, die 
nach willkürlich eingegebenen Wertepaaren gesucht wurde. 

Mit Approxi 16 lassen sich beliebige Funktionen darstellen, 
auch Funktionen mit Definitionslücken. Der Befehl »TRAP« 
verhindert bei unzulässigen Werten einen Programmab¬ 
bruch. Für die Darstellung der Funktion ist der Definitions¬ 
und Wertebereich frei wählbar unter der Voraussetzung, daß 
die Koordinatenachsen in diesem Bereich liegen. Der erste 
einzugebende Wert muß daher zu jeder Koordinatenachse 
negativ sein. 

Bei der Darstellung auf dem Plotter wird die maximale hori¬ 
zontale Auflösung von 480 Punkten ausgenutzt, in vertikaler 
Richtung beträgt die Auflösung 600 Punkte. Der Abstand der 
Markierungen auf den beiden Achsen beträgt genau 10 mm. 
Dadurch können auch Zwischenwerte leicht aus der Plotter- 
Grafik ausgemessen werden. 
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C16, Plus/4 


Das Programmlisting ist mit REM-Anmerkungen gut kom¬ 
mentiert und damit leicht nachvollziehbar. 

(Joachim Stolte/kn) 



Bild 3. Die Bildschirmausgabe der Funktion, die der Compu¬ 
ter nach der Eingabe von willkürlichen sechs Wertepaaren 
berechnet hat. Die Konstanten für die Funktion (links oben) 
werden nach < RETURN > ausgegeben. 



Bild 4. Fast alle experimentell ermittelten Kurven sind durch 
entsprechende Funktionen darstellbar. 


1 «00 RbM **« FUNKT 1 UNENPbQTTER S. POLYNUMAPPROXIMATION **» 
1O10 REM *»»«•»»»*«* 1906 BY JOACHIM STOLTE .»««»*»**»* 
1020 REM #**HHH**HH*#*#**#-IHH»THHHH**HMMHHHHH**HHMH**HHH*#**NH*** 


1030 COLQR 0,7,0: CQLQR 4,7,0:COLaR 1,8,7:GRAPHIC 1,1:GRAP 
H1CO 

104O POKE 65286,PEEK(65286) OR 16 i REM TURBO-MODUS AUS 
105O GG3UB 8010 
1060 : 

1070 PRINT CHR*(147>|CHR*(14)|CHR*<18>i"<7SPACE>flUSWAHLME 
NIJE <8SPACE > " j CHR* (146) 

1080 PRINT:PRINT "(1) EINGABE NEUER FUNKTIONEN" 

1090 PRINT:PRINT "(2) AUSGABE AUF AILDSCHRIM" 

1100 PRINT:PRINT "(3) AUSGABE AUF FLOTTER" 

1110 PRINTsPRINT "(4) .PUL YNOMAPPROXIMATION" 

1120 PR INT: PR INT " (5> .PROGRAMM BEENDEN" 

1130 GETKEY A*:SP=VAL<A*> 

1140 IF A*<"1" OR A*>"5" THEN 1130 
1150 ON SP GOTO 1190,5680,1410,2750,6330 
1160 : 

1170 REM EINGABE DER FUNKTIONEN *«« 

1180 : 

1190 PRINTCHR*(147)!PRINT "ANZAHL DER FUNKTIONEN "jsGOSUB 
6340:ZZ»W:PRINT 

1200 IF ZZ<1 OR ZZ>3 THEN 1190 
1210 FOR I«1 TO 3:A*(I)*"":NEXT 
1220 FOR I«1 TO ZZ 
1230 PRINT:1NPUT“Y=";AT(I> 

1240 NEXT I 
1250 : 

1260 REM **» NEUE FUNKTIONEN INS PROGRAMM EINFUEGEN *** 
1^70 : 

1280 PRINTCHR*(147) 3 "8010 DEF FNA<X)=" 5 A*(1) 

1290 PRINT"802O DEF FNB(X)=";A*(2) 

1300 PRINT"8030 DEF FNC(X)=";A*(3) 

1310 PRINT"BO40 A*(1)="?CHR*(34):"Y°":At(l>:CHR*(34> 

1320 PRINT"8050 A*(2)="?CHR*(34>;"Y="?A*(2)aCHR*(34> 

1330 PRINT"B060 A$(3)=";CHR*(34);"Y=";A*(3):CHR$(34) 

1340 PRINT"8070 ZZ=";ZZ 
1350 PRINT"RUN" 

1360 P0KE1319,19:FORX=1320 TO 1327:POKEX,13:NEXT 
1370 POKE 239,9:P0KE65286,PEEK(65286) AND 239:END 
1380 : 

1390 REM «** AUSGABE DER FUNKTIONEN AUF PLOTTER *** 

140O : 

1410 F0RX=1T07:CL0SE X:NEXT 
1420 OPEN1,6,1 

1450 0PEN4,6,0 

1460 OPEN6,6,6:PRINT #6,1 

1470 3 

1480 GOSUB 650O : REM *** EINGABE *** 

1490 : 

1500 REM *** BERECHNUNG DER X,Y-ACHSEN *** 

1510 : 

1520 IF A=0 THEN A=-B*.007:XF=1 
1530 IF B=0 THEN B=-A*.007:XF=1 
1540 XS=(B-A>/480 
1550 YS=(D—C)/600 
1560 YO=INT(ABS(A/XS)+.5) 

1570 MA=D/YS:MI=C/YS:X<*=INT (ABS (D/YS)+. 5) 

1580 IF C>0 THEN MI=0 

1590 PRINT#1,"M",0,-50:PRINTH3,1 

1600 : 

1610 REM *** AUSGABE DER FUNKTIONBTERME «*# 

1620 : 

1630 PRINT#6,0 
1640 FOR I=1T0ZZ 

1650 PRINT#2,4—I:PRINT#4," "jA*(I) 

1660 NEXT 
1670 PRINT#6,1 
1680 : 

1690 REM **# ZEICHNET X-ACHSE *#« 

1700 : 

1710 PRINT44:PRINT44:PRINT#3,0 

1720 PRINTM1,"M",0,-XO 

1730 PRINT#4:PRINT#2,0 

1740 PRINT** 1,"D",479,0:PRINT# 1 ,"D",0,0 

1750 Xl-Y0-INT(Y0/50>«50 

1760 : 

1770 FOR X-0TO 8 
1780 X2-Xl+X*50 
1790 PRINT#1,"M",X2,—3 
1800 PRINT#1,"D",X2,3 
1810 NEXT X 
1820 : 

1830 REM *** BESCHRIFTET X-ACHSE *** 

1840 : 

1B50 X2=X1:Z=INT((A+X1*XS>#100+.5)/1O0 
1860 : 

1870 FOR X=0 TO 8 

1880 IF XF=1 AND X=0 THEN 1940 

1890 X2-X1+50*X-B 

1900 IF X2<9 THEN 1940 

1710 PRINT#1,"M",X2,-15 

1920 IF ABS(Z > < 0.05 THEN PRINT#4,"T2SPACE>"a:GOTO 1940 
1930 PRINT#4,Z; 
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1940 Z=INT((Z+50*XS)*100+.5)/100 
1950 IF Z>1E3 THEN Z=INT(Z*10+.5)/I0 
I960 NEXT X 
1970 s 

1980 REM *** ZEICHNET Y-ACHSE *** 

1990 s 

2000 Yl=INT(D/VS+.5) 

2010 Y2«INT<Y1/50)»5O 
2020 PRINTMl, "M",Y0,Yl+50 
2O30 PRINTM1, "D",Y0,Yl-6008PR1NTM1," 

2040 I 

2050 REM «h»* BESCHRIFTET Y-ACHSE *** 

2060 i 

2070 Z-INT<(Y2«YS)*100>.5)/10O 
2080 YS»(D-C)/600 
2090 FOR X-0 TG 11 
2100 Y3=Y2-50*X 
2110 PRINTM1 ,"M",Y0-3,Y3 
2120 PR I NT Ml , " D" , Y0+3, Y3 
2130 IF ABS(Z)<0.05 THEN 2160 
2140 IF YO>440 THEN PRINTM1,"M",Y0-45,Y3 
2150 PRINTM4," "|Zj 
2160 Z-INT<<Z-50*YS)*100^.5)/100 
2170 NEXT X 
2180 s 

2190 IF PO-0 THEN 2400 
2200 8 

2210 REM *»* BEI POLYNOMAPPRQX. BENENNUNG DER ACHSEN *** 
2220 8 

2230 PRINTM1,"M",Y0+10,Y1+401 PRINT44,NY*j” IN ("|EY*|")" 
2240 N*=NX*+" IN ("+EX*+")" 

2250 H=470—LEN(N*)*6 
2260 PRINTM1,"M",H,-30iPRINT#4,N*i 
2270 PRINTM2,2 

2280 i 

2290 REM *** KENNZEICHNUNG DER MESSWERTE *** 

2300 8 

2310 FOR L=1 TO N 
2320 X=(XP <L)—A)/XSs Y=YP(L)/YS 
2330 IF X<1 OR X >481 THEN 2360 
2340 PRINT Ml,"M" t X—2,Y—4 
2350 PRINTM4,"+"; 

2360 NEXT L 
2370 : 

2380 REM *** AUSGABE DER FUNKTIONEN *** 

2390 s 

240O FOR V=1 TO ZZ 
2410 TRAP 2450 
2420 IF V=1 THEN Y=FNA(A)/YS 
2430 IF V=2 THEN Y=FNB(A)/YS 
2440 IF V=3 THEN Y=FNC(A)/YS 
2450 IF Y>MA THEN PRINTM1, "M",0,MA: GOTO2480 
2460 IF Y<MI THEN PRINTM1, "M",0,MIzGOTO24B0 
2470 PRINTM1,"M",0,Y : Z=0 
2480 PRINTM2,4—V 
2490 s 

2500 FOR 1=1 TO 479 
2510 TRAP 2620 
2520 X=A+I*XS 

2530 IF V-l THEN Y=FNA(X)/YS 
2540 IF V=2 THEN Y=FNB<X)/YS 
2550 IF V=3 THEN Y=FNC(X)/YS 

2560 IF OQ= 1 THEN 00=0: PRINTM 1 , "M" , I , Ys GOTO 2630 
2570 IF Z=0 AND Y<MI THEN PRINTM1,"D",I f MIsZ=l 
2580 IF Z=0 AND Y >MA THEN PRINTM1,"D",I,MAs Z=1 
2590 IF Y>MA THEN PRINTM1,"M" t I, MA:G0T02630 
2600 IF Y<MI THEN PRINT41,"M",I,MI:GOTO2630 
2610 PRINTM1,"D",I,Y sZ=0:G0T02630 

7620 DO=1 

2630 NEXT I,V 
2640 8 

2650 REM *** ZEICHNE RAHMEN *** 

2660 i 

2670 TRAPiPRINTM1, "M",0,MI-50iPRINTM2,O 

2680 PRINTM1,"D",0,MA+140s PRINT#1,"D",479,MA+140:PRINTW1, 
“ D " ,4 79 , MI -50 
2690 PRINTH1,"D",0,MI-30 
2700 PRINTM1, "M",0,M1-120 
2710 IF PO-1 THEN 42001 ELSE 1OOO 
2720 i 

2730 REM *** POLYNOMAPPROXIMATION *** 

2740 a 

2750 CLR:PO"18 PRINT CHR*(147> 

2760 DIM R%(10),SX<8),XY<4),A(55) 

2770 REM *#* FUNKTIONENBEZEICHUNG *#* 

2780 s 

2790 FK*(1)="Y=A+B*X" 

2800 FK* (2) — " Y=A+B*X+C*X t2" 

2810 FK* <3) -"Y-A+B*X+C*X T2+D*X T3" 

2820 FK* (4) ="Y=A+B*X+C*X T2+D*X t3+E*X T4 " 

2830 FK*(5)="Y=A*EXP <B*X) 

2840 FK*(6)-"Y=A*XtB 
2850 FK* <7>="Y=1/(A+B*X) 

2860 FK*(8)-"Y=X/(A+B*X) 

2870 FK*(9)-"Y=A*LN(B*X)" 

2880 FK*(10)="£OMPUTER WAEHLT fUNKTION" 

2890 s 

2900 PRINT CHR$(147);CHRf(18):CHR$(155);"(2SPACE>£DLYN0MA 
PPRO XIMAT ION C3SPACE>";CHR*(158) 


2910 REM *** EINGABE DER WERTEPAARE *** 

2920 : 

2930 PRINT 

2940 PRINT "ANZAHL DER AERTEPAARE<2SPACE> " j:GOSUB 6340:N- 
W:PRINT:PRINT 

2950 DIM X<N>, Y (N),XP(N),YP(N) 

2960 PRINT CHR*(lG)j" EINGABE DER flESSWERTE "jCHR*(146)3 P 

RINTsPRINT 

2970 FOR L=1 TO N 

2980 PRINT L". (3SPACETX- "3 GOSUB 6340a X<L)=W 

2990 PRINT TAB(23)("Y® "ssGOSUB 6340s Y(L)-WsPRINTsPRINT 

3000 XP(L)-X(L)sYP(L)=Y(L> 

301O NEXT L 
3020 : 

3030 REM **# FUNKTIONENAUSWAHL *** 

3040 GOSUB 70201A=IO 

3050 FOR L«=l TO N: X <L)-XP <L> 8 Y (L)-YP <L) »NEXT 
3060 FOR L-l TO 10: R7.(L) -0s NEXT: SP-1: R7. (1) -18 
307O PRINT CHR*(147) 

3000 PRINT CHR*(19)jCHR*(18);CHR* (155)I"<2SPACEJfOLYNOMAP 
PRU X1MAT 1ON C3SPACE >"j CHR*(150) 

309O s 

31O0 FOR L-l TO IO 

3110 L*=>RIGHT*("T2SPACE>"+STR*(L>,3>+". " 

3120 PRINT 

3130 PRINT CHR*(R*/.(L) >»L*jFK*(L> 

3140 NEXT L 

3150 PRINT CHR*(155) 

3160 PRINTCHR*(18)|"DERZEIT ANGEWAEHLTER flENUEPUNKT "iSPs 
CHR*(157)|" " 

3170 GETKEY A* 

3180 R7. (SP) = O 

3190 IF ABC(A*)=13 THEN 3260 

320O IF A*=CHR*(17) THEN SP=SP+1+A*(SP=A> 

3210 IF A*=CHR*(145) THEN SP=SP-1-A*(SP=1> 

3220 IF A*=CHR*(19) THEN SP-1 
3230 R7.(SP) = 1B 
3240 GOTO 3000 
3250 s 

3260 TRAP 6980 8 REM *** BEI FEHLER VERZWEIGE *** 

3270 : 

3280 ÜN SP GOSUB 5010,5050,5090,5130,5150,5260,5370,5470, 

5570,6630 

3290 : 

3300 REM +++ BERECHNUNG DER FUNKTION +++ 

3310 : 

3320 REM *** BERECHNUNG DER SUMMEN *** 

3330 : 


3360 FOR K=1 TO 2*M 

3370 FOR L=1 TO N:SX(K)=SX(K>+X(L)TK:NEXT 
3380 NEXT K 
3390 : 

3400 FOR K=1 TO M 

3410 FOR L=1 TO Ns XY(K)=XY(K)+Y(L)*X(L)tK:NEXT 
3420 NEXT K 
3430 b 

3440 REM *** AUFSTELLUNG DER KOEFFIZIENTENMATRIX *** 

3450 s 

3460 NG=M+1:B(1)=SY 
3470 s 

3480 FOR L=2 TO NGxB(L)=XY(L-1)xNEXT 
3490 A(11)=N 

3500 FOR L=2 TO NG:A(10+L)-SX(L-1>:NEXT 
3510 FOR 0=2 TO NG 

3520 FOR L=1 TO NG:A(Q*l0+L)=SX((Q-2)+L)sNEXT 
3530 NEXT Q 
3540 i 

3550 REM *** LOESEN DES LINEAREN GLEICH.-SYST. *** 

3560 b 

3570 FOR MG-1 TO NG 
3580 P=A(MB*11)aIF P-0 THEN 3700 
3590 FOR L=MG TO NB 

3600 A(MG*1 0+L)—A(MB*10+L)/Ps HA(L)—A(MG*10+L) 

3610 NEXT L 

3620 B(MG)=B(MG)/P»HB(L)=B(MG)sHB-B(MG) 

3630 IF MG>-NG THEN 3690 
3640 FOR Q-MG+1 TO NG 
3650 V=-A(0*10+MB) 

3660 FOR L-MG TO NGsA(Q*10+L)=A(O*10+L)♦HA(L)*Vi NEXT 
3670 B(Q)-B(0)+HB#V 
3680 NEXT O 

3690 NEXT MGiGOTO 3800 
3700 HL-MG+1 
3710 IF HL>NG THEN 3780 
3720 FOR L-MG TO NG 
3730 HZ(HL*10+L)-A(MG»10+L)t A(MG*10+L)-A(HL *10+L):A(HL*10 
+L)-HZ(HL»1 0+L) 

3740 NEXT L 

3750 BH=B(MG)s B(MG)=B(HL):B(HL)-BH 
3760 IF A(MG)«11—0 THEN HL=HL+1»G0T0 3710 
3770 GOTO 3580 

3780 PRINTCHR*(147)"J^DEFF1ZIENTEN KOENNEN NICHT"8PRINT"BE 
RECHNET WERDEN" 

3790 GOTO 1000 
3800 C(NG)=B(NG) 

3810 FÜR L=NG-1 TG 1 STEP -1 
3820 FOR Q=L+1 TO NG 


ms 


FOR L=1 TO Ns SY—SY+Y(L)!NEXT 


D" ,Y0, Yl-t-50 


I 
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3S30 B(L)-B[L)-C(Q>»A<L»10+Q) 

384» NEXT O 
3850 C(L)=B(L> 

3860 NEXT L 
3870 : 

3880 ON SP BOSUB 6460,6460,6460,6460,0220,5330,3440,5340, 

5640 

3890 . 

3900 REM »*» AUSGABE DER ERGEBNISSE •»« 

3910 l 

3920 1F FE-1 THEN 4100 
3930 PRINT CHR*(147> 

3940 PRINT CHR*<19>sCHR*(18>|CHR*(lS5)|"<2SPACE>£ßLYN0MAP 
PRQX IMAT I0N<3SPACE>" i CHR# ( 15B) 

3950 PRINT:PRINT "ERGEBNIS FUER"lPRINTlPRINT CHR*(18)[FK* 
(SP) 

3960 PRINTlA*(1)-FK*(SP) 

3970 FÜR L-l TO NB 

3980 IF ABS(C(L))<1E-07 THEN C(L)-0 
3990 C(L)-INT(C(L)»lE-*-07*.5> /1E+07 
4O00 PRINTIPRINT CHR*(64+L)||C(L) 

4010 NEXT L 

4020 l 

4030 REM *•* BERECHNUNG DES FEHLERS #«» 

4040 I 
4050 S-0 

4060 FOR L-l TO N 

4070 S-S+(YP(L)-FNA(XP(L)))T2lS-INT(SH1E6+.5)/1E6 
4000 NEXT 
4090 : 

4100 IF FG-1 THEN 6730 
4110 TRAP 
4120 i 

4130 PRINT CHR*(155) 

4140 PRINT:PRINTiPRINT"FEHLER = ";S 

4150 PRINT:PRINT CHR*(1B)!"HEITER MIT > RETUKW I" 

4160 GETKEY A*:IF ASC(A*)<>13 THEN 4160 
4170 i 

41B0 REM **» MENUE *»* 

4190 e 

4200 PRINT CHR*(147) 

4210 PRINT CHR*(19)iCHR*(lB)lCHR*(155);"<2SPACEJ£0LYN0MAP 
PROXIMAT ION C3SPACE!■;CHR*(15B > 

4220 PRINT:PRINT "(1) AUSGABE AUF ALOTTER” 

4230 PRINTrPRINT "(2) AUSGABE AUF .BILDSCHIRM" 

4240 PRINTePRINT "(3) EINGABE NEUER AESSWERTE" 

4250 PRINTePRINT "(4) HEUE ÜJNKTION WAEHLEN" 

4260 PRINTePRINT "(5) AESSWERTE UEBERPRUEFEN" 

4270 PRINTePRINT "(6) FUNKTION ZEIGEN" 

4280 PRINTePRINT "(7) ZURUECK INS ÜAUPT-AENUE" 

4290 GETKEY At:W-VAL(A*>:IF W< 1 OR W>7 THEN 4290 
4300 ON W GOTO 4340,5680,2730,3030,7080,3900,1000 
4310 : 

4320 REM »«* AUSGABE AUF PLOTTER *#• 

4330 : 

4340 OPEN 1,6,1:OPEN 2,6,2:OPEN 3,6,3eOPEN 4,6,0:OPEN 6,6 

,6: PRINTW6,1 

4350 PRINT#3,2:PRINT#2,0 

4360 PRINT CHR*(147) 

4370 PRINT "ÜEBERSCHRIFT (MAX. 20 Z£ICHEN)"sCHR*(17) 

43B0 INPUT A* 

4390 IF LEN(A*)>20 THEN 4360 
4400 : 

4410 PRINT#4:PRINT#4,A* 

4420 PRINT#3,0:PRINT#2,1 
4430 : 

4440 PRINT:INPUT"HAME DER SROESSE X" S NX* 

4450 PRINT:INPUT"£INHEIT VON X"sEX* 

4460 PRINT.INPUT'HAME DER ÜROESSE Y"|NYt 

4470 PRINT:INPUT"£INHEIT VON Y"|EY* 

4480 : 

4490 PRINT#4,"(5SPACE5AR."t:PRINT#1,"M",100,0:PRINT#4,NX* 
1 

4500 PR INT#1,"M",300,01PRINT#4,NY* 

4510 PRINT#1,"M",100,0ePRINT#4,"IN ("|EX*|“> 

4520 PRINT#1,"M",300,0:PRINT#4,"IN ("|EY*| ">" 

4530 PRINT#4lPR1NT#4:PRINT#2,2 
4540 : 

4550 REM «»» AUSGABE DER MESSWERTE AUF PLOTTER *** 

4560 i 

4570 FOR L-l TO N 

45B0 N*-"C6SPACE >"+STR*(L > E N#-RIGHT*(N*,6) 

4590 IF XPILX0 THEN Z— 1E-4.ELSE Z-1E-4 

4600 X-INT(XP(L)»1E3+.5)/1E3+Z 

46(0 IF YPILX0 THEN 2— 1E-4.ELSE Z-1E-4 

4620 Y-INT(YP(L)#IE3+.5)/1E3+Z 

4630 X*-"C9SPACE>"+STR*(X> 

4640 Y*—"(9SPACE>"+STR*(Y) 

4650 X*=LEFT*(RIGHT*(X*,11),10):IF XP(L)-0 THEN X*="(5SPA 
CE >0.000" 

4660 Y*—LEFT*(RIGHT*(Y*,11),10):IF YP(L>=0 THEN Y*-"f5SPA 
CE>0. 000" 

4670 PRINT#4,N*; 

46B0 PRINT#1,"M",110,0:PRINT#4,X»;:PRINT#I,"M",310,01 PRIN 
T#4,Y* 

4690 NEXT L 
4700 s 

4710 REM #«# ZEICHNE RAHMEN *«# 

4720 : 

4730 H=Ne* 104-55: PR I NT#2,0 


4740 PRINT#1,"D",0,Hs PRINT#1,“D",479,Hl PRINT#1,"D",479,0: 
PRINT#1,"D",0,0 

4750 PRINT#1,"M",0,H-40:PRINT#1,"D“,479,H-40 
4760 PRINT#1,"M",60,Hs PRINT#l,"ü",60,0 
4770 PRINT#1,"M",275,H:PRINT#1,"D",275,0 
4780 PRINT#4:PRINT#4:PRINT#4 
4790 i 

4800 REM »«* AUSGABE DER BERECHNETEN KOEFFIZIENTEN »*» 
4810 : 

4B20 PRINT#6,OlPRINT#2,1iPRINT#1,"M",90,0:PRINT»4,A*(1)EP 
RINT#4:PRINT«2,2 
4830 FOR L=1 TO NG 

4840 IF SP>1 THEN N*-CHR*(L+64)lELSE N*="A"+MID*(STR*(L-l 
>,2> 

4850 IF ABS(CIL))>1E—4 THEN X-INT (C (L) <*1 E6+. 5) / IE6: ELSE X 
-C <L> 

4860 PR INT#1,"M",100,0:PRINT#4,N*1"-" J X 
4870 NEXT L 
4880 PRINT#6,1 
4390 : 

4900 REM «•« ZEICHNE RAHMEN **» 

4910 s 

4920 PRINT#2,0:H—NG#10+35 

4930 PRINT#1,"D",0,Hl PR INT#1,"D“,479,H:PRINT#1,"D",479,0s 

PRINT#1,"D",0,0 

4940 PRINT#4:PRINT#4lPRINT#4 

4950 ZZ—1:GOTO 1410 

4960 : 

4970 REM *«* FUNKTIONENDEFINITIONEN »«» 

4980 : 

4990 REM »«» POLYNOM 1. GRADES »«» 

5000 : 

SO10 DEF FNA(X)=C(1)+C(2)*X:M=1:RETURN 
5020 : 

5030 REM *«» POLYNOM 2. GRADES **» 

5040 : 

5050 DEF FNA < X)—C(1)+C(2)*X+C(3)*X*X:M=2:RETURN 
5060 : 

5070 REM »«* POLYNOM 3. GRADES *** 

5080 : 

5090 DEF FNA(X)=C(1>+C(2>»X+C(3>*X*X+C(4)«X*X#X:M=3:RETUR 
N 

5100 : 

5110 REM *** POLYNOM 4. GRADES *«» 

5120 : 

5130 DEF FNAlX>-C(l>+C(2>+X+C(3)*X*X+C(4>*XT3+C(5>*Xt4:M- 
4 s RETURN 
5140 : 

5150 IJC“ «*« Y-A*EXP(B*X> »»* 

5170 FOR L=1 TO N 

5180 Y(L)=LOG(YP(L))/LOG(10) 

5190 NEXT L 
5200 : 

5210 M=lsRETURN 

5220 C(1)=10TC(1)sC(2)=C(2)*LOG(10> 

5230 DEF FNA(X)=C(1>*EXP(C(2)*X) 

5240 RETURN 
5250 s 

5260 REM »#* Y=A*XTB **» 

5270 i 

5280 FOR L=1 TO N 

5290 X(L)—LOG(XP(L>)/LOG(10)sV(L)=LOG(YP(L))/LOG(10) 

5300 NEXT L 
5310 i 

5320 M=l:RETURN 
5330 C(I)=10tC(l) 

5340 DEF FNA(X)—C(1)#XtC(2) 

5350 RETURN 
5360 : 

5370 REM »*» Y=I/(A*B*X> *«« 

5380 l 

5390 FOR L-l TO N 

5400 Y(L)-1/YP(L>iX(L)-XP(L) 

5410 NEXT L 
5420 . 

5430 M-l:RETURN 

5440 DEF FNA(X)-1/(C(I)+C(2)«X) 

5450 RETURN 
5460 : 

5470 REM »«• Y—X/(A+B*X) #*» 

5480 l 

5490 FOR L-l TO N 

5500 Y(L>-XP(L>/YP(L)sX(L)—XP(LI 

5510 NEXT L 

5520 s 

5530 M-l:RETURN 

5540 DEF FNA(X)=X/(C(1XC<2)*X> 

5550 RETURN 
5560 : 

5570 REM «»* Y=A*LN(B»X> *»« 

5580 : 

5590 FOR L-l TO N 

5600 X(L)—LOG(XP(L>)sY(L)—YP(L) 

5610 NEXT L 
5620 M-l:RETURN 
5630 : 

5640 DEF FNA(X)=C(1)*L0G(C(2)«X) 

5650 A-C(1)lC(1)=C(2)sC(2)-EXP(A/C(2)) 
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5660 RETURN 

6590 PRINT TAB(12);"BIS YG= GOSUB 6340:D=W:PRINT 

5670 : 

6600 IF D<0 THEN PRINT "YO MUSS GROESSER GLEICH 0 SEIN '" 

5680 REM *** AUSGABE AUF BILDSCHIRM *«* 

:PRINT:GOTO 6590 

5690 J 

6610 RETURN 

5700 GOSUB 6500 i REM *** EINGABE 

6620 : 

5716 ! 

6630 REM *** COMPUTER WAEHLT FUNKTION *** 

5720 COLUR 0,1,O:COLDR 4,1,0:GRAPHIC1,1 

6640 PRINT CHR* < 147) ; "BERECHNUNG IM TURM—HO BUS (.J./ß) ?« 

5730 a 

6650 GETKEY A* 

5740 XS=(B-A)/320lYS=(U-C)/200 

6660 IF A*="J" THEN P0KE65286,PEEK(65286) AND 239 

5750 Y0=1NT(ABS(A7XS)):X0=INT(ABS(D/YS)) 

6670 : 

5760 IF X0>199 THEN X0=X0-1 

6680 FG=1 

5770 IF Y0>319 THEN YO-Y0-1 

6690 FOR SP-1 TO 9 

5780 i 

6700 FE=0 

5790 FÜR I**0TG22i FÜR J-0T022:DRAW1,15.95*J,9.95*1:NEXT J, 

6710 UN SP GOSUB 5010,5050,3090,3130,5150,5260,5370,5470, 

I 

5570 

580O * 

6720 GOTO 3310 

5810 Z-2ICOLÜR 1,2,7 

6730 F (SP) “S: IF FE=1 THEN F(SP) —1 

5820 DRAW1,0,X0 Tü 319,XO 

6740 PRINT:PRINT CHR*(155)|"fEHLER - "iF(SP) 

5830 DRAW1,Y0,0 TO Y0,199 

6750 : 

5040 i 

6760 FE=0:GOSUB 7020 

5B50 FORJ-0TO22 

6770 : 

5860 IF Z»3 THEN Z=2: ELSE Z"3 

6/BO NEXT SP 

5870 DRAW1,J*15.95,X@-Z TO 15.95*J,X0+Z 

6790 s 

5800 DRAW1,Y0-Z,9.95*J Tü Y0+Z,9.95*J 

6800 POKE 65286,PEEK(65286> OR 16 : REM TURBO-MODUß AUS 

5090 NEXTJ 

6810 PRINT CHR* (147) : CHR* ( 15B> ; CHR* ( 1B) ; " (2SPACEIHIJNKT ION 

59O0 3 

"lTAB(27):"FEHLER" 

5910 X=X0/8-l:IF X<1 THEN X”1 

6820 F1=1E10:F2=0:FG=2 

5920 Y=Y0/8+liIF Y>35 THEN Y=Y-4 

6830 FOR SP=1 TO 9 

5930 CHAR1,0,X,STR*(A>:CHAR1,36,X,STR*(B> 

6840 PRINT:PRINT FK*(SP)|TAB(25)1F<SP) 

5940 CHAR1,Y,0,STR*(D):CHAR1,Y,24,STR*(C) 

6850 IF F1=F(SP) AND LEN(FK*(F2)))LEN(FK*(SP)) THEN F2=SP 

5950 TRAP 7350 

6860 IF Fl>F(BP) AND F(SP)<>-1 THEN F1=F(SP):F2=SP 

5960 I 

6870 NEXT SP 

3970 REM «** KENNZEICHUNG DER MESSWERTE *** 

6880 PRINT CHR*(155):SP=F2:FE=0 

5980 s 

6890 PRINT"ßUSGEWAEHLTE tUNKTION IST":PRINT CHR*(18)|FK*( 

5990 IF PO=0 THEN 6060 

SP) 

600O FÜR 1=1 TO N 

6900 FOR L-l TO N:X(L)-XP(L):Y(L)-YP(L)xNEXT L 

6010 X=INT((XP(I)-A)/XS+.5) 

6910 PRINT:PRINT CHR*(18):"HEITER MIT >5ETURN<": 

602O Y-199-INT((YP(I>-C)/YS+.5) 

6920 GETKEY A*:IF ASC(A*)<>13 THEN 6920 

6030 CIRCLE 1,X,Y,2 

6930 PRINT" OK";CHR*(158) 

6040 NEXT I 

6940 GOTO 3280 

605O 3 

6950 : 

6060 FÜR V=1 Tü ZZ 

6960 REM *** FEHLERROUTINE *** 

6070 IF V=1 THEN J=FNA(A):F=3 

6970 : 

6000 IF V=2 THEN J=FNB(A):F=6 

6980 PRINT CHR*(147)?"JJDESUNG NICHT VORHANDEN FUER":PRINT 

6090 IF V=3 THEN J=FNC(A):F=7 

:PRINT CHR*(18):FK*(SP) 

6100 C0L0R1,F,7 

6990 FE=1 

6110 CHAR 1,0,V-1,A*(V>,1 

700O RESUME NEXT 

6120 Y»199-INT((J-C)/YS+.5) 

7010 : 

6130 LOCATE O,YsX=0:Z=0 

7020 REM *** SUMMEN 0 SETZEN *** 

6140 3 6*GR om 

6150 FÜR XW=0 TO 319 

rn ;y=0 

6160 TRAP 6260 

7050 FOR L=1 TO 4:XY(L)=0:NEXT 

6170 I=A+XW*XS 

7060 FOR L=1 TO 8:SX(L)=0:NEXT 

6180 IF V=1 THEN J=FNA(I) 

7070 RETURN 

6190 IF V=2 THEN J=FNB(I) 

7080 : 

62O0 IF V=3 THEN J=FNC(I> 

7090 REM *** UEBERPRUEFUNG DER MESSWERTE *** 

6210 Y=199—INT <(J—C)/YS+.5) 

71O0 : 

6220 IF z=0 AND Y<0 THEN DRAW 1 TO XW,0 :Z=1: BOTO 6260 

7110 PRINT CHR*(147);CHR*(IB);CHR*(158);"<2SPACE3£!£SSWERT 

6230 IF Z=0 AND Y>199 THEN DRAW 1 TO XW,199:Z=1: GOTO 626 

E(2SPACE >" 

O 

7120 FOR 1=1 TO N 

6240 IF Y<0 OR Y>199 THEN LOCATE XW,Y:GOTO6260 

7130 PRINT 

6250 DRAW 1 TO XW,Y t Z=0 

7140 PRINT I S ".(2SPACE)"I"X= "|XP(1)|TAB(23)|"Y= "iYP(I) 

6260 NEXT XW,V:TRAP 

7150 NEXT 1 

6270 : 

7160 PRINT CHR*(155) 

6280 COLOR 4,7,0: COL.OR 1,8,7 

7170 PRINT "ALLE flESSWERTE KORREKT ? (i/A> 

6290 GETKEY A*8 IF ABC(A*X>13 THEN 6290 

7180 GETKEY A* 

6300 GRAPHICO:COLOR 0,7,0 

7190 IF A*="J" THEN 7300 

6310 IF P8=l THEN 3930 

7200 IF A*="N" THEN 7220 

6320 GOTO 1000 

7210 GOTO 7180 

6330 END 

7220 PRINT 

6340 REM *»* EINGABEROUTINE *«* 

7230 F'R INT "HUMMER DES FALSCHEN flESSWERTES "; 

6350 A*="" 

7240 GOSUB 6340:I=W:PRINT 

6360 PRINT"?"| 8GETKEY B* : PRINT CHR*(157)| 

7250 PRINT:PR INT I;“. X- "|:GOSUB 6340:X=W 

6370 W*ASC(B*) 

7260 PRINT TAB(23>!"Y= GOSUB 6340:Y=W:PRINT 

6380 IF W>44 AND W<58 THEN PRINI B*Il80T0 6430 

7270 XP(I)=X:X(I)=X:YP(1)-Y:Y(I)=Y 

6390 IF W=13 AND LEN<A*)>0 THEN 6450 

7280 GOTU 7110 

6400 IF W< >20 THEN 6440 

7290 : 

6410 PRINT CHR*(157> j"7 "jCHR*(157);CHR*(157); 

6420 A*=LEFT*(A*,LEN(A*>-1):GOTO 6440 

7300 PRINT: PRINT CHR* (18)1 "ZURUECK INS BENUE MIT 'MÜA5JK 

6430 A*=A*»B* 

7310 GETKEY A*:IF ASC(A*)<>13 THEN 7310 

6440 GOTO 6360 

7320 GOTO 4200 

6450 W=VAL(A*)iPRINT " "s « 

7330 i 

6460 RETURN 

7340 REM **# FEHLERMELDUNG *** 

6470 : 

7350 GRAPHIC 0 

6480 REM **» UP-EINBABE »«* 

7360 PRINT CHR* ( 147) ; "J1NFANGSWERT HAT FEHLER VERURSACHT." 

6490 i 

7370 PRINI "BERECHNUNGEN WERDEN NICHT FORTGEFUEHRI" 

6500 PRINTCHR*(147)iPRINT 

73B0 PRINT: PRINT CHR*(18)J"HEITER MIT >JJLT.U-RH': " 

6510 PRINT"flARGTELLUNGSBEREICH DER FUNKTION AUF":PRINT 

7390 BETKEY A*:IF ASC(A*)<>13 THEN 7390 

6520 PRINT"DER X-flCHSE VON XU= GOSUB 6340:A=W:PRINT:PR 

7400 IF PO=l THEN 4200 

INT 

7410 GOTO 1000 

6530 IF A>0 THEN PRINT "XU MUSS KLEINER GLEICH 0 SEIN !": 

7420 : 

PRINT:GOTO 6520 

8000 REM **» EINBEFIJEGTE FUNKTIONEN #** 

6540 PRINT TAB (12) ; "BIS XO- " ; : GOSUB 6340:B=W:PRINT:PRINT 

B01O DEF FNA(X)“X T2 

6550 IF B<0 THEN PRINT "XO MUSS GROESSER GLEICH 0 SEIN 1" 

8O20 DEF FNB(X)- 

:PRINT:GOTO 6540 

8030 DEF FNC(X)« 

6560 PRINT"SARSTELLUNGSBERE1 CH DER JJJNKTION AUF":PRINT 

8040 A*(l)=“Y=Xf2" 

6570 PRINT"DER Y-ßCHSE VON YU= "j:GOSUB 6340:C=W:PR INT:PR 

8O50 A*(2)="Y=" 

INT 

8060 A*(3)="Y=" 

6580 IF C>0 THEN PRINT "YU MUSS KLEINER GLEICH O SEIN : 

8070 ZZ= 1 

PRINT:GOTO 6570 

8100 RETURN 

Listing 1. Das Programm »Approxl 16« berechnet die mathematische Funktion zu Ihren Versuchsergebnissen 
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C16, Plus/4 


Kazik and the Ghosfs 


Als Ritter namens Kazik, in den Gängen eines 
riesigen Schlosses, müssen Sie versuchen, den 
Geistern zu entkommen. Dieses Action-Spiel für 
den C16 Ist genau das Richtige für hartnäckige 
Spielefreaks. 

I n diesem abenteuerlichen Action-Spiel übernehmen Sie 
die Rolle des Ritters Kazik und finden sich überraschend 
in den unheimlichen Gängen eines finsteren Schlosses 
wieder. Während Sie verzweifelt versuchen, den Ausgang 
aus diesem Irrgarten von Gängen zu finden, werden Sie von 
den gruseligen Bewohnern dieses Schlosses belästigt. Doch 
zum Glück ist der Ritter in der lebensfeindlichen Umgebung 
nicht völlig verloren. Es finden sich in einigen dunklen Ecken 
wertvolle Flaschen mit Lebenselixir, die den Ritter wieder fit 
machen können. Außerdem gibt es da noch ominöse Truhen, 
die allerdings auch einen unschätzbar wertvollen Inhalt 
haben. In ihnen liegen die Bolzen für die magische Armbrust 
des Ritters, mit denen er auf die garstigen Geister schießen 
und sie zum Umkehren bewegen kann. Über Seile gelangt 
man auf die verschiedenen Tunnelebenen des Schlosses, 
doch Vorsicht ist geboten: Jeder Schritt in dem verfluchten 
Gebäude kostet Kraft und der Ausgang ist noch weit. Es gilt, 



sich die wenigen Portionen des Lebenselixirs vernünftig ein¬ 
zuteilen. Dieses Spiel ist komplett in Maschinensprache 
geschrieben. Tippen Sie bitte das Listing mit dem MSE aus 
dieser Ausgabe ein und speichern es auf Diskette. Danach 
können Sie es mit LOAD" name ",8,1 absolut laden und müs¬ 
sen es mit dem Befehl SYS 6144 oder vom Monitor aus mit 
G 1800 starten. (B. Rau/T. Mucha/jk) 
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C16, Plus/4 


SPIELE-LISTING 


Music Lab: 

Das musikalische Labyrinth 


Finden Sie den Schatz im Labyrinth, aber verges¬ 
sen Sie nicht, wie Sie wieder entfliehen können. 
Music Lab ist ein Spitzenspiel für den C16. 

D as Spiel »Musikalisches Labyrinth« konnte schon als 
Leser-Listing aus der Happy-Computer-Ausgabe 5/85 
begeistern. Nun gibt es dieses hervorragende Spiel als 
Umsetzung auf dem CI6. So brauchen C16-Besitzer nicht 
mehr auf ein wirklich spannendes Labyrinthspiel mit netter 
Musik zu verzichten. 

Der Kampf gegen die Zeit 


Das Spiel Music Lab kann als Basic-Programm geladen und 
mit »RUN« gestartet werden. Danach können Sie zuerst wäh¬ 
len, ob Sie mit dem Joystick oder über die Tastatur mittels der 
Cursor-Tasten spielen möchten. Wählen Sie entsprechend 
durch Druck auf die Taste < J > oder < K >. Danach beginnt 
das Spiel und Sie sehen den Ausschnitt eines Labyrinths von 
oben. In der Mitte befinden sich im Gang zwischen den Mau¬ 
ern zwei gelbe Punkte, die den Startpunkt markieren. Sie 
müssen nun versuchen, den im Labyrinth versteckten Schatz 
zu finden. Dazu ertönt bei jeder Bewegung, die gemacht wird, 
ein Ton, der immer tiefer wird, je näher Sie dem Schatz kom¬ 
men. Steuern Sie sich also durch den Irrgarten und merken 
Sie sich, wohin Sie gehen. Sollte das Symbol für den Schatz 
im Gang auftauchen, so ist es kaum zu übersehen. Nachdem 
der Schatz gefunden und genau in die Mitte des Bildschirm¬ 
ausschnitts gebracht wurde, beginnt eine Melodie zu spie¬ 
len. Solange diese Melodie ertönt, haben Sie Zeit, wieder 
zum Ausgangspunkt zurückzufinden. Sollte Ihnen das gelin¬ 
gen, so geht das Spiel mit dem nächsten Level weiter. Um den 
Schatz zu finden, steht auch nur eine bestimmte Zeit zur Ver- 


LOOK FOR TREASURE ! 



IME: e009gl LIMIT: 

rm:I OOSSOO LEUEL; A Ihoil 


Finden Sie mit Hilfe der Musik den Ausgang 


fügung, die in der Fußzeile mit Limit angezeigt wird. Man muß 
sich also schon erheblich sputen, während man die Gänge 
des Labyrinths durchsucht. Wenn der Schatz nicht rechtzei¬ 
tig g Q " nden wird, zeigt das Programm die erreichte Höchst¬ 
punktzahl an und es kann ein neues Spiel beginnen. 

Das Spiel Music Lab besteht aus zwei Programmteilen, 
wobei der erste in Basic geschrieben wurde (Listing 1). Die¬ 
sen geben Sie bitte unter Beachtung der Eingabehinweise 
für Basic-Programme in diesem Heft ein und speichern ihn 
auf Diskette. Das Basic-Programm lädt nach dem Starten ein 
Maschinenprogramm mit Namen »PART 2« von Diskette 
nach. Geben Sie dazu das Listing 2 mit dem MSE aus diesem 
Heft ein und speichern es mit dem Namen »PART 2« auf Dis¬ 
kette. Danach steht dem Spielspaß nichts mehr im Wege. 

(T. Mucha/B. Rau/jk) 


10 IF A=0 THEN A=1 s LÜAD "PART 2",B,1:REM C.Q.S 

20 REM *3500..*3F60 

30 REM CHARACTERB AND MUSIC 

40 REM MUSIC ENABLE-SYS 13733 

50 REM MUSIC STOP-SYS 13754 

60 REM MUSIC START=POKE 16224,1 

70 REM MUSIC TEMPO-PQKE 16228,TEMPO 

80 REM SEE LINES 1000 (MUSIC OFF) 

90 REM AND 1100 (MUSIC 0N> 

100 PQKE 55,255lP0KE56,52:CLR 

110 POKE 65302,66:POKE65303,251 

120 P0KE65298,192:P0KE65299,56:PRINT"CCTRL-H3“ 

130 D1MMA*(23) 

200 COLOR0,1:CÜLUR4,1 

210 PRINT"{WHITE,CLR,RISHT,RVSUN,3BSPACE3" 

212 PR INT"CRIGMT,RED,RVSON,38SPACEJ" 

215 P0KE652B 7 ,8:PR1NT 

220 PRINTTAB(12)"CYELLÜW,RVS0N3HCBRIGHT3R 

221 PRINTTAB(12)"{RVSDN3HC8RIGHT,2SPACE3" 

222 PR INT TAB (6 > " (RVOFF , BLUE 1 CSPACE , YELLOW ,RVS 

ON Jff C5RIGHT , RV0FF3f,CRVS0N , 2RIGHT 3HC7R1GHT ,RVÜFF , BL 
UE3CYELLUW3" 

223 PR I NT TAB (12) " {RVSON A. TTTT FTR H. Tf " 

224 F'RINTTAB(12) 11 {RVS0N3H RCRIGHTTf?.{RIGHT)f? 
W 


Listing 1. Das Basic-Programm 


225 PRINT" CDÜWN3"TAB(12) " {GREY 2>P R E S E N T S : 

226 PR1NI"{WHITE >" 

227 PRINT"lRlGHT3ff{2SPACE3ff ff ff AUU. 'ff -U-»-I. C3SPACE>ff 

C2SPACE3ff 3Jf§ ffdfcS" 

228 PRINT" {RIGHT 3 -ttH.-. = = Jü = .-.C5SPACE3 .-.MH.-. ffüHC 
2SPACE)HC2SPACE 

229 PRINT" CRIGHr3ffC2SPACE3ff UUS, J-*A ff ÜJLÖ.C3SPACE 3ff 
12SPACE1 ff ff ff flAff ffÄft" 

230 PRINT”CDOWN,BLUE 3GAME BASED ON MUSIKALISCHES 
LABYRINTH' 

231 PRINT"CRIGHT3WRITTEN ON C-64 BY E.WITTIG " 

232 PRIN1TABU2) "(SEE HAPPY COMPUTER' 6/85) 

233 PRINT"CDOWN,RIGHT,BREY 33AUTHORS OF C-16 PROGR 
AM: 

234 PRINT" {RIGHT 3BOHDAN R. RAU !< TADEUSZ MUCHA 
280 LV=l:8C-0 

290 CHAR 1,6,24,"{YELL0W3SELECT KEYBOARD OR JOYSTI 

CK" 

300 GETKEY K*:IFK*< >"K"ANDK*< >"J"THEN300 
310 RESTORE 500:FORI=0TÜ23:READMA*(I>:NEXT 
320 X-1NT(RND(0 > *40 > +1:Y=INT(RND(1>*24) 

330 IFMID*(MA*(Y),X,1)="@"THEN320 

340 MID$(MAt(Y),X,1)=",8" 

350 XK=INT(RND(1)*39 > +1:YK=INT(RND(1)*24) 
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C16, Plus/4 


355 IF SQR( (X-XK)*(X-XK)+(Y-YK)*(Y-YK> X7THEN350 
360 IF MID*(MA*(YK>,XK,2)<>"«2SPACEJ"THEN350 
370 MID*(MA*(YK) ,XK,2)-"££" 

400 SCNCLR:CHARI,11,1,"<YELLOW>LOOK FÜR TREASURE ! 

405 PUDEF"0" 

407 LI=3250—250*LV 

410 CHAR1,3,22,"(CYANJTIME:":CHAR1,25,22,"LIMI Ts 4M 
HI TE}":PRINTUSING"0@#H#O";LI 

420 CHAR1,3,23,"4RED >SCORE: 4WHITE J":PRINTUSING"### 

#*)#";SC 

430 CHAR1,25,23,"4REDIHIGH : 4WHITE>"lPRINTUSING"## 
; Hl 

440 CHAR1,16,24,"4BLUE>LEVEL: CWHITEJ":PRINTLV; 

444 COLUR1,3,5 

445 CHAR1,14,14, "X10RIBHTX 

450 CHAR1,16,10," 4YELLOW JWo'oWoT" 

460 FÜRI-11TD17 J CHAR1,16,1,"T£6RIBHT JT" 1NEXT 
470 cHARi,i6,ia,"romnTDW' 

4B9 XX=XK: YY-YK: PQKE65287,24: SYS 1 3754 
490 TI*-"000000" 

500 data " @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@00 

501 data "@@@@e@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 

502 data "@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@0 

503 DATA"ee 42SPACE 5 S@ 42SPACE)0© 49SPACE 5 e@ 417SPACE > 
a@" 

504 DATA"ae16SPACE} @SC9SPACE > @0417SPACE> e@" 

505 DATA"e@ 42SPACE}e@ 42SPACE > e@ 42SPACE > @000® C2SPAC 
E)00 42SPACE J @@e@®@@@@@@@0 42SPACE}@0 

506 DATA"@0 42SPACE> @0 C2SPACE> @0 42SPACE)@0000 C2SPAC 
E J @0 42SPACEJ @@@@@@@@@@@@@ 42SPACE > 00 

507 DATA"@0 42SPACE > @0 C1SSPACE> @00 47SPACE)@0 42SPACE 
J@@ 

508 DATA"@0 42SPACE > @0 42SPACE } @0 42SPACE!0000000000 4 
2SPACE5000 42SPACE)0 44SPACE > 00 42SPACE > @0 

509 DATA"00 C2SPACE J @0 42SPACE J 00 42SPACE J @@@@@@@@@8 4 
2SPACE 5 00042SPACE > 0 44SPACE J 00 42SPACE} 00" 

510 DA TA“@042SPACE!00 C2SPACEJ 00 410SPACE 1 @0 42SPACE > 
@00 42SPACE > 000 42SPACE > 00 42SPACE > @@" 

511 DATA"@0 42SPACE 1 00 42SPACE > 00 42SPACE)00 42SPACE } 0 
0 42SPACE J 00 42SPACE >000 42SPACE>@00 42SPACE)00 42SPACE 

512 DATA"@0 S6SPACE > @0 42SPACE> @0 42SPACE)00 42SPACEi0 
000000 47SPACE1@0 42SPACE3 00 

513 DATA"000000 42SPACE 3 00 42SPACE3 0@ 42SPACE 300 46SPA 
CE 3 000 42SPACE 3 @00 42SPACE > 00 42SPACE3 00 

514 DATA"@@@@@0 46SPACE3 00 42SPACE 3 @0 42SPACE3 0000000 
42SPACE 3 00042SPACE 300 42SPACE3 @0 

515 DATA"0042SPACE 300 42SPACE 3 @0 42SPACE 3 00 42SPACE 3 0 
0 42SPACE3 00 47SPACE 30 44SPACE 3 @0 42SPACE 3 00 

516 DATA"00 46SPACE 300410SPACE3 @0 47SPACE 3 044SF ACE 3 0 
042SPACE300 

517 DATA"00 42SPACE 3 000000 42SPACE 3 @000000000 42SPACE 
>@@@@@@@@@@@0 42SPACE3 @0 

51B DATA"0042SPACE3@0000042SPACE3@@@@@@@@@042SPACE 
3 @@@@@@@@@@@0 42SPACE 3 @0 

519 DATA"@0410SPACE300424SPACE>00 

520 DATA"@@410SPACE 3 @0 424SPACE3 @0 

521 DA IA"0@00@@@@@@@@@@@@@@@@@e@e@@0@@0@@@@@@@@@@" 

522 DATA "@@@@@@@@0@@@@@@@@@0@@@@@@@@@@@@@@0@@@@@@ 

523 DATA "@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@000000000 


600 PRINT"4GREY 33":FÜRI=-3TÜ3:CHAR1,17,14+I,MID*( 
MA*(YY+I),XX-2,6>:NEXT 
605 TJ=TI 

610 CHAR 1,9,22," 4WHITE3 " : IFP=0THENPRINTUSING"4MM)#tt 
*";TJ 

620 IF P=0AND (PEEK (3651 ) —660RPEEK (3652) —66) THEN 1 00 

0 

621 IF P-lANDPEEK(3651)-67ANDPEEK(3652)=67THEN1100 
630 IF TJ3LITHEN1200 

635 IFP=1ANDPEEK(16224)-0THEN1200 
637 I FP= 1THEN650 

640 VOLB:SO=820+9»SQR((XX-X)*(XX-X)+(YY-Y)*(YY-Y)) 

I IFSO >1000THENSO-1000 
645 S0UND3,SO,2 

650 IF K*= " J"THENQN(JOY(1)AND15)+1GOTO605,B00,605, 
750,605,050,605,700,605 

660 BETA*:ONINSTR("4LEFT,RIBHT,UP,DOWN3",A*)+1GOTO 
605,700,750,B00,850 

700 IFPEEK(3650)—0THEN605 

701 XX—XX-1:GOTÖ600 

750 IFPEEK(3653)=0THEN605 

751 XX=XX+1:GOTO600 

800 IFPEEK(3611)=0ORPEEK(3612)=0 THEN605 

801 YY-YY-1:SOTO600 

850 IFPEEK(3691)=0ORPEEK(3692)=0THEN605 

851 YY—YY+ls GOTQ600 

1000 SC-SC+(LI-TJ):P=1:SYS13733s POKE16228,11-UV:PO 
KE 16224,1 

1010 CHAR1,8,1,"4YELLOW3COME BACK TO ENTRY POINT " 

1011 CHAR1,10,2,"WHILE MUSIC PLAY" 

1020 CHAR1,3,23,"SCORE:4WHITE3":PRINTUSING"######" 

• g£ 

1030 CHAR1,3,22,"436SPACE3" 

1040 LI=999999SGOTO600 
1100 SYS13754 

1110 AD-PEEK (16226) +256*PEEK (16227) 

1120 SC=SC+20*(390-AD) 

1130 VOLB:FORI=1TO50:SOUND1,500+500*RND(0),1:NEXT 
1140 SCNCLR:CHAR1,10,10,"4YELLOW3 YOUR SCORE: 4WHITE 
3":PRINTUSING"######";SC 

1150 CHAR1,5,12,"4YELLOW3PRESS ANY KEY TO NEXT LEV 
EL" 

1155 £4^*: LV=LV+1 

1160 -pUi'.E239,0:GETKEY A*:GQTO310 
1200 SYS13754 

1210 VOL 8:FORI=500TO1000STEP5:S0UND2,1500—1,1:SOU 
ND1,1,1:NEXT 

1220 FOR 1=1T064:A=(IAND7)+1:CHAR1,15,21,MID*("4BL 
ACK,WHITE,RED,CYAN,PURPLE,GREEN,BLUE,YELLOW3",A,1) 
SPRINT"TIME OVER!" 

1230 SOUND1,RND(1)*500+500,2:NEXT 
1240 COLOR1,8,7:SCNCLR 

1250 CHAR1 ,5,5, "YOUR SCORE: 4WHITE3 ": PRINTUSING"#*t* 
*MMt";SC 

1255 CHAR1,5,7,"4YELLOW3HIGH SCORE:4WHITE3": PRINTU 
SINB"ttlMMt#tt";HI 

1257 IFHI4SCTHENCHAR1,5,10,"4YELLOW3IT * S RECORD!": 
HI-SC 

1260 CHAR 1,3,22,"4YELLOW3PRESS ANY KEY TO NEXT GA 
ME " : P0KE239,0: GETKE YA*: BOTO200 
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SPIELE-LISTING 


C16, Plus/4 


Auf Mördersuche... 


Während einer Party ist ein Mord geschehen. Sie 
als anwesender Kriminologe erhalten nun den 
Auftrag, das Verbrechen aufzuklären. 

D as Programm »Inspector« (Listing) ist ein Denk- und 
Knobelspiel, bei dem es darum geht, den Mörder, das 
Mordzimmer und die Tatzeit zu ermitteln. 

Das Besondere an dem Programm ist, daß bei jedem Neu¬ 
start durch einen Zufallsgenerator ein neuer Mörder, eine 
neue Tatzeit und ein anderes Mordzimmer ausgesucht wer¬ 
den. 

Das Programm kann nach dem Laden einfach mit RUN 
gestartet werden. Danach fragt das Programm nach dem 
Namen des Spielers, also nach Ihrem Namen. Der Name darf 
aber nur sechs Zeichen lang sein. Alles, was länger als sechs 
Zeichen ist, wird abgeschnitten. Anschließend folgt eine 
kurze Einleitung, die das Spiel erklärt. 


Nach dem Bildaufbau lassen sich aus dem folgenden Menü 
durch Drücken der entsprechenden Zahlen Fragen an die 
einzelnen Personen stellen. Die verdächtigen Personen 
geben dann Auskunft darüber, 

1. wo die betreffende Person sich zu einer bestimmten Zeit 
aufgehalten hat und 

2. wann die Person in welchem Raum gewesen ist. 

Aus den Antworten kann man nun durch logisches Überle¬ 
gen den Fall lösen. Bei den Antworten ist aber folgendes zu 
beachten: 

1. Der Täter wird versuchen, Sie zu belügen 

2. Wenn zum Beispiel die Antwort von Peter »Ich war um 
1 Uhr in der Garage und konnte Lukas sehen« lautet, muß 
geprüft werden, ob Lukas um 1 Uhr entweder in der Garage 
oder im Schlafzimmer war. Schlafzimmer deshalb, da man in 
diesen Raum nur von der Garage aus sehen kann. 

Sind alle Fakten richtig erkannt und die Aufgabe gelöst wor¬ 
den, ist das Spiel beendet. (Andreas Zilla/dm) 


10 REM ******************************* 

300 PRINT "Ta5SPACE}T/TT<5SPACE,RVSON>r{RVO 

20 REM * INSPEKTOR * 

FF>XXXXX " 

30 REM * * 

310 PRINT " f £4SPACE}T£4SPACE}+++++++£++£5SPA 

40 REM * FUER C16/116 VON * 

CEJTXXXXXTT" 

50 REM * * 

320 PRINT "T{4SPACE}¥£4SPACE>/A8BBÄBa TT5SPA 

60 REM * ANDREAS ZILLA * 

CE}T{6SPACE>T" 

70 REM ******************************* 

330 PRINT "T£4SPACE>Tt4SPACE>T£8SPACE>Tf5SPA 

80 INPUT "{CLRIIHREN NAMEN BITTE 1-6 ZEICHEN 

CE > x ■ 6SPACE JT" 

"; NNi 

340 PRINT "TI4SPACE}++++++++++ ++++++++++£6S 

90 IF LEN <NN$)>6 THEN NN$=LEFT$(NNf,6) 

PACEJT" 

100 DIM DZ(5,9) 

350 PRINT "T£24SPACEJTGARAGET" 

110 NA*<1)="HEINZ": NA* (2) ="PETRA": NA*(3>=" 

360 PRINT "TKUECHE£2SPACE>KINDER£3SPACEJSCHL 

LUKAS" 

AF f8SPACE}T" 

120 NA* <4)="TILLY": NA*(5)="PETER": RA*(1>=" 

370 PRINT "T{6SPACE}T{8SPACE}TfSSPACE}T£6SPA 

GARAGE": RA*(2)="SCHLAF": RA*(3>="KINDER 

CE>T" 

" 

380 PR IN 1 " VVVVV+VV+VVVV+VV+VV+V*V+>VV+V4-V+V 

130 RA*(4)="KUECHE": RA*(5)="GAESTE": RA*(6) 

" 

="KELLER" 

390 POKE 2021,24: POKE 2022,13: POKE 2023,0: 

140 PRINT "{CLR>" 

POKE 2024,39 

150 CHAR ,11,0,"fSVNTH.:130JI N S P E K T 0 

400 FOR X=1 TO 5 

R{SYNTH.:132>" 

410 OZ(X,1)=INT(6*RND(1)> +1 

160 CHAR ,1,6,"IHRE AUFGABE IN DIESEM ADVENT 

420 NEXT X 

URE IST ES," 

430 FOR X-2 TO 9 

170 CHAR ,1,7,"EINEN MOERDER ZU ENTLARVEN." 

440 FOR Y=1 TO 5 

180 CHAR ,1,8,"AUF EINER PARTY WURDE DER GAS 

450 A=INT(6*RND ( 1 >) +1 

TGEBER" 

460 IF A=OZ <Y,X-1 ) THEN 450 

190 CHAR ,1,9,"-GEORGE-UMGEBRACHT.ALS TAETER 

470 OZ CY,X)=A 

KOMMEN" 

4B0 NEXT Y 

200 CHAR , 1 ,10,"FOLGENDE PERSONEN IN FRAGE." 

490 NEXT X 

210 CHAR ,1,12,"PETER,PETRA,TILLY,LUKAS,HEIN 

500 MU=INT ( 5*RND ( 1 ) )+1 

Z" 

510 TZ=INT(9*RND(1) ) +1 

220 CHAR ,1,14,"VERSUCHEN SIE DURCH FRAGEN,D 

520 RA=OZ(MU,TZ) 

EN" 

530 IF MU=1 THEN 580 

230 CHAR ,1,15,"MOERDER,DAS MORDZIMMER UND D 

540 FOR X=1 TO MU-1 

IE" 

550 IF OZ < X ,TZ)=RA THEN OZ (X ,TZ ) =INT(5*RND < 1 

240 CHAR ,1,16,"TATZEIT ZU ERMITTELN." 

) )+l: GOTO 550 

245 CHAR ,1,17,"DIE TATZEIT LIEGT ZWISCHEN 1 

560 NEXT X 

UND 9" 

570 IF MU=5 THEN 610 

250 CHAR ,1,19,"(SYNTH.:130JBITTE DRUECKEN S 

580 FOR X=MU+1 TO 5 

IE EINE TASTE<SYNTH.:132>" 

590 IF OZ(X,TZ)=RA THEN OZ ( X,TZ ) =INT(5*RND ( 1 

260 GET KEY C* 

)) +1 : GOTO 590 

270 PRINT " <CLR >+++++++++ iiI++++++++IiI+++XX 

600 NEXT X 

XXX" 

610 REM *** BEGINN *** 

280 PRINT " T{4SPACE } T£ 10SPACE,RVSON>Tf{RVQFF, 

620 PRINT " CCLRJWEN WOLLEN SIE DEN NUN ALSO 

BSPACEJTXXXXX" 

25PACE}" 

290 PRINT "T<7SPACE>GAESTE{2SPACE,RVS0N>-ir{RV 

630 PRINT "NAECHSTES VERHOEREN ? INPUT V 

OFF} KELLER tRVSONJTCRVOFFIXXXXX " 

* 
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64@ FOR X=1 TD 5 

1290 IF X1=0 THEN 1310 

650 IF V*=NA*(X) THEN 700 

1300 GOTO 1020 

660 NEXT X 

1310 PRINT "-ICH WAR ZU KEINER ZEIT IM "RA*( 

670 PRINT V*" IST ABER NICHT DABEI GEWESEN!" 

W)"-RAUM": GOTO 1020 

: FOR X=1 TO 3000: NEXT X 

1320 PRINT "{CLR}" 

680 PRINT "{CLR}" 

1330 PRINT "MR."NN*" - WOLLEN SIE SAGEN, DAS 

690 GOTO 620 

S SIE” 

700 V=X 

1340 PRINT V*" IN VERDACHT HABEN ?" 

710 PRINT "{CLR}WAS WOLLEN SIE "V*" FRAGEN ? 

1350 PRINT TAB(5)"(DOWN)NENNEN SIE:" 

{3SPACE}" 

1360 PRINT "(DOWN,3RIGHT} 1. DEN MOERDER ?" 

720 PRINT "l.WO "V*" ZU EINER BEST. ZEIT WAR 

1370 PRINT "C3RIGHTJ2. DIE TATZEIT ?" 

?" 

1380 PRINT "(3RIGHTJ3. DAS MORDZIMMER ?" 

730 PRINT "2.WANN "V*" WO GEWESEN IST" 

1390 PRINT " (3RIGHT>4. WISSEN SIE NICHT WEIT 

740 : 

ER ?" 

750 PRINT "3.FALL GELOEST !!! 

1400 BET KEY A* 

760 GET KEY A* 

1410 X=VAL(A*>: PRINT "{DOWN}" 

770 X=VAL(A*) 

1420 PRINT "<CLR>" 

780 IF X<1 THEN 760 

1430 ON X GOTO 1440,1530,1610,1750 

790 IF X>3 THEN 760 

1440 A2=A2+1 

800 GOSUB 1810 

1450 IF V=MU THEN 1470 

810 ON X GOTO 820,1060,1320 

1460 PRINT "LEIDER IST "NA*(V)" NICHT DER MO 

820 PRINT "{CLR}"V*" WO WAREN SIE UM ";: INP 

ERDER!": GOTO 1490 

UT ZT: PRINT : A1=A1+1 

1470 PRINT "{DOWN}"NN*" ,DU HAST RECHT!" 

830 IF ZT<1 THEN PRINT "{2UP>“: GOTO 820 

1480 PRINT "IN DER TAT! "NA*(V>" IST DER MOE 

B40 IF ZT>9 THEN PRINT "<2UP>": GOTO 820 

RDER!": L=L+1 

850 IF V=MU THEN 870 

1490 FOR XX=1 TO 3000: NEXT XX: PRINT "{DOWN 

860 GOTO 890 

}" 

870 IF RND(1)<.5 THEN B90 

1500 PRINT "{CLR>" 

880 LU=INT(5*RND(1>)+l: GOTO 900 

1510 IF L=3 THEN 1710 

890 LU=OZ(V,ZT) 

1520 GOTO 620 

900 PRINT "-ICH WAR ZU DER ZEIT IM "RA*(LU)" 

1530 PRINT "WANN GESCHAH DER MORD ? ";: INPU 

-RAUM!" 

T ZT 

910 IF RND(1)>.2 THEN 940 

1540 A2=A2+1 

920 IF ZT>TZ THEN PRINT "-UM"ZT"UHR WAR GEOR 

1550 IF ZT=TZ THEN PRINT " {DOWNFANTASTISCH! 

GE SCHON TOT!"c GOTO 940 

DIE MORDZEIT STIMMT!": L=L+1: GOTO 157 

930 PRINT UM"ZT"UHR LEBTE UNSER GASTGEBER 

0 

NOCH!" 

1560 PRINT "{DOWNJLEIDER NICHT!" 

940 FOR X=1 TO 5 

1570 FOR XX=1 TO 3000: NEXT XX: PRINT "{DOWN 

950 IF X=V THEN 970 

>“ 

960 IF OZ(X,ZT)=LU THEN PRINT "-ICH WAR IM " 

1580 PRINT " {CLR}" 

RA*(LU)"-RAUM MIT "NA*(X> 

1590 IF L=3 THEN 1710 

970 NEXT X 

1600 GOTO 620 

980 FOR X=1 TO 5 

1610 PRINT "WELCHES IST DAS MORDZIMMER ? 

990 IF V=X THEN 1010 

INPUT R*: A2=A2+1 

1000 IF OZ(X,ZT)=LU—1 OR OZ(X,ZT)=LU+1 THEN 

1620 FOR X=1 TO 6 

PRINT "-ICH KONNTE "NA*(X)" SEHEN!" 

1630 IF R*=RA*(X) THEN 1650 

1010 NEXT X 

1640 NEXT X: PRINT "{2UP>": GOSUB 1820: GOTO 

1020 PRINT " (DOWN}TASTE" 

1610 

1030 POKE 239,0: WAIT 239,1: POKE 239,0 

1650 IF X=RA THEN PRINT " {DOWNJRICHTIG "NN*" 

1040 PRINT "{CLR}": GOSUB 1820 

, DIES IST DAS MORDZIMMER!": L=L+1: GOT 

1050 GOTO 620 

0 1670 

1060 GOSUB 1820 

1660 PRINT "{DOWNJSIE MUESSEN SICH GEIRRT HA 

1070 PRINT "{CLR}"V*", WANN WAREN SIE IN RAU 

BEN! " 

M-";: INPUT R*: PRINT : A1=A1+1 

1670 FOR XX=1 TO 300©: NEXT XX: PRINT "{DOWN 

1080 FOR X=1 TO 6 

>" 

1090 IF R*=RA*(X> THEN 1110 

1680 PRINT "{CLR}" 

1100 NEXT X: PRINT "<2UP>": GOTO 106O 

1690 IF L=3 THEN 1710 

1110 W=X 

1700 GOTO 620 

1120 FOR X=1 TO 5 

1710 PRINT 11 {CLR} HERZLICHEN GLUECKWUNSCH "N 

1130 IF NA*(X)=V* THEN 1150 

N*", DU HAST " 

1140 NEXT X 

1720 PRINT " DEN MORDFALL GELOEST." 

1150 V=X 

1730 : 

1160 IF V=MU GOTO 1180 

1740 END 

1170 GOTO 1260 

1750 PRINT ”{CLR}ICH BIN ENTTAEUSCHT VON DIR 

1180 IF RA=W THEN 1200 

II 

1190 GOTO 1230 

1760 PRINT NN*" !!!{2D0WN}" 

1200 X=INT(RND(1)#9)+1 

1770 PRINT "{DOWN}FOLGENDES HAT SICH ZUGETRA 

1210 PRINT "-ICH WAR UM"X" UHR IM "RA*(W)"-R 

GEN: " 

AUM! " 

1780 PRINT TAB(5)"{DOWN}UM"TZ"HAT “NA*(MU>" 

1220 GOTO 1020 

DEN GASTGEBER GEORGE" 

1230 IF RND(1)<.5 THEN 1260 

1790 PRINT TAB(5)"IM "RA*(RA)"-RAUM UMGEBRAC 

1240 X=INT(RND(1)*9)+1 

HT! " 

1250 IF RND(1)<.5 THEN PRINT "-ICH WAR UM"X" 

1800 PRINT "{3D0WN}": END 

UHR IM "RA*(W)" RAUM!": GOTO 1020 

1810 PRINT "{CLR}" 

1260 X1=0: FOR X=1 TO 9 

1820 RETURN 

1270 IF OZ(V,X)=W THEN PRINT "-ICH WAR UM"X" 


UHR IM "RA*(W)"-RAUM!": Xl=l 


1280 NEXT X 

Listing. »Inspector« - Entlarven Sie den Mörder 




SONDERHEFT 14 


143 








SPIELE-LISTING 

C16, Plus/4 

■ ■ __b__ _ n _ i ■ a 

Haben Sie ein Problem? 

Möchten Sie sich gerne mit Ihrem Computer 

Allgemeinbefinden des Anwenders. Nachdem Sie diese 

unterhalten, ihm Fragen stellen und ihm antwor¬ 
ten? Kein Problem: »Eliza« macht’s möglich! 

Frage mit »Nein« beantworten, bohrt Eliza unablässig weiter. 
So entsteht mit der Zeit ein umfangreiches Frage-und- 
Antwort-Spiel, wobei sich die Fragen immer auf die entspre- 

W ntwickelt wurde Eliza (Listing) in den Anfangszeiten der 
fc Kl-Forschung (Kl = Künstliche Intelligenz). Eliza stellte 
■I damals einen revolutionären Fortschritt in diesem For¬ 
schungszweig dar. Entwickelt wurde Eliza ursprünglich in der 
Sprache Lisp, die auch heute noch in der Kl-Forschung Ver¬ 
wendung findet. Natürlich benötigten die Forscher damals 
noch riesige Computer, um die gewünschte Leistung erzie¬ 
len zu können. Wie Sie sehen, ist es heute ohne weiteres 
möglich, solch abstrakte Probleme in Basic zu formulieren. 
Es ist schon eine kleine Sensation, daß Eliza heute nicht mehr 
nur einer privilegierten Forschergilde zur Verfügung steht, 
sondern auch den Besitzern von Heimcomputern wie dem 

C16 und Plus/4. Doch nun zum Programm selbst. Nach dem 
Start mit RUN beginnt Eliza (Listing) von sich aus einen Dialog 

chenden Eingaben des Anwenders beziehen. In der 
Großcomputer-Version ist Eliza zusätzlich in der Lage, Tips 
und Lösungsvorschläge zu einem Problem zu machen. 
Dadurch läßt sich zwar der Therapeut nicht ersetzen, wird 
aber optimal unterstützt. Solche Möglichkeiten konnten bei 
der C16-Version natürlich wegen des fehlenden Speicher¬ 
platzes nicht implementiert werden. Trotzdem sich auch hier 
mit Eliza lustige oder geistreiche Dialoge führen, die zwar den 
menschlichen Gesprächspartner nie ersetzen, aber einen 
verregneten Nachmittag ohne weiteres aufheitem können. 

Mit dem Programm muß man sich in Englisch unterhalten. 
Es versteht Apostrophe, ignoriert aber Satzteile, die mit Bei¬ 
strichen getrennt werden. Eliza findet auf jede Frage eine 
Antwort, wird aber selbst nicht gern gefragt. 

mit dem Benutzer. Die erste Frage bezieht sich dabei auf das 

(Michael Holzmann/dm) 

10 PRINT " CCLR} ": 

R*(5)="Y0UVE" 

20 COLQR 4,8,4: COLOR 0,7,3: COLOR 1,B,7 

400 N(6) = 3: K*(6) ="I FEEL": S$(6>=" IM ": 

30 REM AUGUST 1786 

R$(6)= " YOURE“ 

40 REM UMGESCHRIEBEN VON: M. HOLZMANN 

410 N(7) = 3: K*(7> ="WHY DONT YOU”: S*(7>=" 

50 REM ***************************** 

I": R*(7)=" YOU " 

60 REM ABGEAENDERT FUER : PLUS/4,C 16 

420 N(8> = 2: K$(8) = "WHY CANT I" 

70 PRINT "CI1SPACEXJCCCCCCCCCCCI " 

80 PRINT "CI 1 SPACE>J1 ELIZA J3" 

430 N(?I = 3: K$(9) ="ARE YOU" 

440 N(lö/= 3: K$(10)="I CANT" 

90 PRINT " CI 1 SPACETJCC.C.C.CCCCCCCK " 

450 N ( 11 )= 4: K*(11)=”I AM" 

100 PRINT " 

460 N<12>=—4: K*(12)=" IM" 

110 PRINT " 

470 N( 13) = 3: K*(13)="Y0U " 

120 PRINT " C4SPACEJELIZA ANALYSIERT IHRE PRO 

480 N ( 14 ) = 5: K*(14)=“I WANT" 

BLEME" 

470 N ( 15) = 7: K$(15)="WHAT " 

130 PRINT 

500 N ( 16 ) =—7: K$(16)="H0W " 

140 PRINT " CUSPACEJSIE BENOETIGEN: 

510 N ( 17) =-9: K*(17)=“WHO " 

150 PRINT 

520 N ( 18) =— 9: K* ( 18) = "WHERE " 

160 PRINT " C4SPACEJ1 ) ENGLISCHKENNTNISSE " 

530 N ( 19) =-9: K$(17)="WHEN “ 

170 PRINT 

540 N(20) =— 9: K*(20)="WHY " 

180 PRINT " (4SPACE>2) (WENN 1 NICHT VORHÄNDE 

550 N(21 ) = 2: K*(21 ) ="NAME” 

N) : 

560 N(22) = 4: K*(22)»"CAUSE" 

170 PRINT "C75PACEJEIN ENGLISCHWOERTERBUCH " 

570 N (23) = 4: K* ( 23 )= "SQRRY " 

200 PRINT 

580 N(24)= 4: K*( 24 )=" DREAM " 

210 PRINT " C4SPACE)3 > EINIGE PROBLEMEC7SPACE 

590 N ( 25 )= 1: K*(25)»"HELLO" 

3 " 

600 N (26) »— 1 : Kt (26) = "HI " 

220 PRINT " C7SPACE3(FALLS SIE KEINE HABEN 

610 N(27) = 5: K*(27)»"MAYBE" 

230 PRINT " C7SPACE3DRUECKEN SIE 'RESET) 

620 N(28) = 5: K*(28)="N0 " 

240 PRINT " 

630 N(27) = 2: K*(27) =" YOUR" 

250 PRINT C4SPACE3 4) SEHR VIEL GEDULD ! ! !“ 

640 N ( 30) = 4: K*(30) =" ALWAYS“ 

260 PRINT 

65© N(31 )= 3; K*(31 ) ="THINK" 

270 PRINT " C4SPACE3WENN SIE ALLES BEISAMMEN 

660 N(32)= 7: K*(32)="LIKE A" 

HABEN: 

670 N(33) = 3: K*(33)="YES " 

280 PRINT " CUSPACE3TASTE DRUECKENC4SPACE 3" 

680 N ( 34 )= 6: K$(34)="FRIEND" 

270 PRINT 

690 N ( 35) = 7: K*(35) =" COMPUTER" 

300 GET KEY AA* 

700 N(36)= 3: K*(36)“"ELIZA" 

310 COLOR 1,1: COLOR 0,2,6: COLOR 4,2,3 

710 N(37) = 3: K*(37)="MONEY" 

320 IF TICL THEN 320 

720 N ( 38 )= 1: K*(38)="I LOVE" 

330 PRINT " CCLRI " 

730 N ( 39 )= 1: K*(37)-"LOVE " 

340 DIM S(42),N(42),R(42),K*(42) 

740 N(40) = 1: K*(40)»"EBERHARD" 

350 N ( 1 ) = 3: K*(l> ="CAN YOU": S* ( 1 )= " ARE 

750 N(41 )= 3: K*(41)="I HATE" 

R*(l)=" AM " 

760 N ( 42 )= 7: K*(42)="NOKEYFDUND" 

360 N(2) = 2: K*(2) ="CAN I": S*(2)=" WERE": 

770 GOTO 840 

R *< 2 )= " WAS " 

780 REM 

370 N(3) = 4: K*<3> ="YOU ARE": S*(3)= " ME 

790 FOR A=1 TO LEN(X*)-LEN(Y$)+1 

": R*(3)= " YOU " 

B0O IF MID$(X$,A,LEN(Y$))=Y$ THEN RETURN 

3B0 N(4) =-4: K*(4> ="YOURE" : S#(4)="YOUR" 

810 NEXT A 

: R*(4)=" MY " 

820 A=0 

370 N(5) = 4: K*(5> ="I DONT": S*(5)="IVE": 

830 RETURN 
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840 Nl=42: N2=14: N3=120 

1460 REM ANTWORT 

B50 S(1>=1 

1470 RESTORE 

860 FOR 1=2 TO NI STEP 1 

1480 FOR 1=1 TO 32: READ B: NEXT 

876 S(1)=S(I-1)+AB5<N(I-1)) 

1490 PRINT 

880 N(I—1)=S(I)—1 

150O FOR X=1 TO R(K): READ F*: NEXT X 

890 IF N <I)<0 TUEN 920 

1510 R<K)=R(K>+1 

900 R<I)=S(I> 

1520 IF R(K)>NCK) THEN R(K)=S(K) 

910 GOTO 930 

1530 X*=F*: Y*="*": GOSUB 780 

920 S(I)=S(I-1): R(I)=R(1-1) 

1540 IF A=0 THEN PRINT "fi: "F*: PRINT : F*=I 

930 NEXT I 

*: GOTO 970 

940 N(N1)=S<N1)+N(N1>-1 

1550 UI*=LEFT*(F*,A-1)+C*+RIGHT*(F*,LEN(F*)- 

950 PRINT HI, I AM ELI ZA l'ELL ME YOÜR PR 

A) 

QBLEM": PRINT 

1560 PRINT "£: "UI*: PRINT 

960 Q=0: P=TI+18000 

1570 GOTO 970 

970 M=T1+10 

1580 DATA 169,0,133,160,169,128,133,161,133, 

980 IF TI <M TUEN 980 

161,160,0,177,160,73,128,145,160,200 

990 INPUT "M";I* 

1590 DATA 192,0,208,245,230,161,169,132,197, 

1000 Q=Q+1 

161,208,237,96 

1010 IF QO100 OR TI >P THEN 1160 

1600 REM ANTWORTEN 

1020 PRINT “CCLR>" 

1610 DATA "DON'T YOU BELIEVE THAT I CAN*" 

1030 PRINT " {9D0WNJ" 

1620 DATA "PERHAPS YOU WOULD LIKE TO BE ABLE 

1040 PRINT " ******************************* 

TO#" 

*******" 

1630 DATA “YOU WANT ME TO BE ABLE TO*“ 

1050 PRINT " *C36SPACE1 * " 

1640 DATA "PERHAPS YOU DON *T WANT TO*" 

1060 PRINT •' * YOUR TIME IS UP! BEFORE I TALK 

1650 DATA "DO YOU WANT TO BE ABLE TO*" 

WITH *" 

1660 DATA "WHAT MAKES YOU THINK I AM*" 

1070 PRINT " *I36SPACE} * " 

1670 DATA "DOES IT PLEASE YOU TO BELIEVE I A 

1080 PRINT ” * YOU ANY LONGER,YOU HAVE TO PA 

M*" 

Y THE *" 

1680 DATA "PERHAPS YOU WOULD LIKE TO BE*" 

1090 PRINT " *I36SPACEJ*" 

1690 DATA "DO YOU SOMETIMES WISH YOU WERE*" 

1100 PRINT " *C5SPACEJBILL OF * 3999.90 + 21 

1700 DATA "DONT YOU REALLY*" 

7. VAT! C3SPACE5*" 

1710 DATA "WHY DON'T YOU*" 

1110 PRINT " *C36SPACE} * " 

1720 DATA "DD YOU WISH TO BE ABLE TO*" 

1120 PRINT " ******************************* 

1730 DATA "DOES THAT TROUBLE YOU?" 

****•***■': PRINT " C7D0WNI" 

1740 DATA "TELL ME MORE ABOUT SUCH FEELINGS. 

1130 M=T1+300 

1750 DATA "DO YOU OFTEN FEEL*" 

1140 IF TI<M THEN 1140 

1760 DATA "DO YOU ENJOY FEELING*" 

1150 GOTO 2850 S4ER Qfl 

1770 DATA "DO YOU REALLY BELIEVE I DON"T *" 

1160 I*=" "+1*+" " 

1780 DATA "PERHAPS IN GOOD TIME I WILL*" 

117© FOR L=1 TO LEN(I$) 

1790 DATA "DO YOU WANT ME TO*" 

1180 IF MID*(I*,L,1>=. THEN I*=LEFT*(I*,L 

1800 DATA "DO YOU THINK YOU SHOULD BE ABLE T 

1)+RIGHT*<I*,LEN<I*)-L) 

□*" 

1190 NEXT L 

1810 DATA "WHY CAN’T YOU*" 

1200 IF I*=P* THEN UI*="IDQWNJfl: PLEASE DON 

1820 DATA "WHY ARE YOU INTERESTED IN WHETHER 

REPEAT YOURSELF": PRINT UI*: PRINT : 

OR NOT I AM*" 

OTO 970 

1830 DATA "WOULD YOU PREFER IF I WERE NOT*" 

1210 REM 

1840 DATA "PERHAPS IN YOUR PHANTASIES I AM*" 

1220 S=0 

1850 DATA "HDW DO YOU KNOW YOU CANT*" 

1230 FOR K=0 TO NI 

1860 DATA "HAVE YOU TRIED?" 

1240 IF K=0 GOTO 1270 

1870 DATA "PERHAPS YOU CAN NOW*" 

1250 X *=I*: Y*=K*(K>: GÜSUB 780 

1880 DATA "DID YOU COME TO ME BECAUSE YOU AR 

1260 IF A< >0 THEN S=K: T=A: F*=K*(K>: GUTO 

E*" 

280 

1890 DATA "HOW LONG HAVE YOU BEEN*" 

1270 NEXT K 

1900 DATA "DO YOU BEL IEVE IT IS NORMAL TO BE 

1280 IF S>0 THEN K=S: L=T: GOTO 1320 

#" 

1290 IF X=7 THEN 1370 

1910 DATA "DO YOU ENJOY BEING*" 

1300 K=N1: GOTO 1470 

1920 DATA "WE WERE DISCUSSING YOU - NOT ME■" 

1310 REM 

1930 DATA "OH, I*" 

1320 C*=" "+RIGHT*(I*,LEN(I*)—LEN(Ff)—L+1) 

1940 DATA "YOU RE NOT REALLY TALKING ABOUT M 

133© FOR X=1 TO N2/2 

E, ARE YOU?" 

1340 FOR L=1 TO LEN(C*) 

1950 DATA "WHAT WOULD IT MEAN TO YOU IF YOU 

1350 IF L+ LEN <S* < X))>LEN <C* ) THEN 1390 

GO I *" 

1360 IF MID*<C*,L,LEN<S*<X>>><>S*(X> THEN 13 

I960 DATA "WHY DO YOU WANT*" 

90 

197© DATA "SUPPOSE YOU SOON GOT*" 

1370 C*=LEFT* <C*,L-1)+R*(X ) +RIGHT*<C*,LEN(C* 

1980 DATA "WHAT IF YOU NEVER GOT#" 

)—L—LEN( S* < X)) + l ) 

1990 DATA "I SOMETIMES ALSO WANT*" 

1380 L=L+LEN(R*(X>> 

2000 DATA "WHY DO YOU ASK?" 

1390 IF X=7 THEN 1430 

2010 DATA "DOES THAT QUESTION INTEREST YOU?" 

1400 IF L+LEN(R*(X))>LEN(0*) THEN 1430 

202© DATA "WHAT ANSWER WOULD PLEASE YOU THE 

1410 IF MID*(C*,L,LEN(R*<X>)><>R*(X> THEN 14 

MOST?" 

30 

2030 DAIA "WHAT DO YOU THINK?" 

1420 C*=LEFT*(C*,L-1)+S*(X> +RIGHT*(C*,LEN(C* 

2040 DATA "ARE SUCH QUESTIONS IN YOUR MIND 0 

>-L~LEN(R*(X>)+1) 

FTEN?" 

1430 NEXT L 

2050 DATA "WHAT IS THAT YOU REALLY WANT TO K 

1440 NEXT X 


1450 IF MID*(C*,2,1> =" " THEN C*=RIGHT*(C*,L 

Listing. Mit »Eliza« können Sie aus Ihrem Computer 

EN(C*)—1) 

einen Gesprächspartner machen (Fortsetzung) 
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206O 

2070 

208O 

2090 

2100 

2110 

2120 

2130 

2140 

2150 

2160 

2170 

2180 

2170 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2270 

2280 

2290 

2300 

2310 

2320 

2330 

2340 

2350 

2360 

2370 

2380 

2390 

2400 

2410 

2420 

2430 

2440 

2450 

2460 

2470 

2480 

2470 

2500 

2510 

2520 

2530 

2540 

2550 

2560 


NOW?" 

DATA "HAVE YOU ASKED ANYONE ELSE?" 

DATA "HAVE YOU ASKED SUCH QUESTIONS BEF 
ORE?" 

DATA "WHAT ELSE LOMES TO MXND WHEN YOU 
ASK THAT?" 

DATA "NAMES DON ' T INTEREST ME." 

DATA "I DON'T CARE ABOUT NAMES - PLEASE 
GO ON." 

DATA "IS THAT THE REAL REASON?" 

DATA "DON'T ANY OTHER REASONS COME TO M 
IND?" 

DATA "DOES THAT REASON EXPLAIN ANYTHINB 
ELSE?" 

DATA "WHAT OTHER REASONS MIGHT THERE BE 
7 " 

DATA "PLEASE DON*T APOLOGIZE!" 

DATA "APOLOGIES ARE NOT NECESSARY." 

DATA "WHAT FEELINGS DO YOU HAVE WHEN YO 
U APOLOGIZE?" 

DATA "DON’T BE SO DEFENSIVE!" 

DATA "WHAT DOES THAT DREAM SUGGEST TO Y 
OU?" 

DATA "DO YOU DREAM OFTEN?" 

DATA "WHAT PERSONS APPEAR IN YOUR DREAM 
S?" 

DATA "ARE YOU DISTURBED BY YOUR DREAMS? 

DATA "HOW Dü YOU DO ... PLEASE STATE YO 
UR PROBLEM." 

DATA "YOU DONT SEEM QUITE CERTAIN." 
"WHY THE UNCERTAIN TONE?" 

"CAN'T YOU BE MORE POSITIVE?" 

"YOU AREN *T SURE?" 

"DON'T YOU KNOW?" 

"WHY NO*“ 

"DON'T SAY NO IT'S ALWAYS SO NEGAT 


"WHY NOT?" 

"ARE YOU SURE?" 

"WHY ND?" 

"WHY ARE YOU CONCERNED ABOUT MY*" 
"WHAT ABOUT YOUR OWN*" 

"CAN'T YOU THINK OF A SPECIFIC EXA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
IVE. 

DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
MPLE?" 

DATA "WHEN?" 

DATA "WHAT ARE YOU THINKING OF?" 

DATA "REALLY ALWAYS?" 

DATA "DO YOU REALLY THINK SO?" 

DATA "BUT YOU ARE NOT SURE YOU*" 

DATA "DO YOU DOUBT YOU*" 

DATA "IN WHAT WAY?" 

DATA "WHAT RESAMBLENCE DO YOU SEE?" 

DATA "WHAT DOES THE SIMILARITY SUBBEST 
TO YOU?" 

DATA "WHAT OTHER CONNECTIONS DO YOU SEE 

?" 

DATA "CDULD THERE REALLY BE SOME CONNEC 
TIONS?" 

DATA "HOW?" 

DATA "1 UNDERSTAND!" 

DATA "ARE YOU SURE?" 

DATA "YOU SEEM QUITE POSITIVE." 

DATA "I SEE." 

DATA "WHY DO YOU BRING UP THE TOPIC OF 
FRIENDS7" 

DATA "DO YOUR FRIENDS WORRY YOU?" 

DATA "DO YOUR FRIENDS PICK ON YOU?" 

DATA "ARE YOU SURE YOU HAVE ANY FRIENDS 


2570 

2580 


"DO YOU IMPOSE ON YOUR FRIENDS?" 
"PERHAPS YOUR LOVE FOR FRIENDS WOR 
RIES YOU." 

DATA “DO COMPUTERS WORRY YOU?" 

"ARE YOU TALKING ABOUT ME IN PARTI 
CULARY?" 

2610 DATA "ARE YOU FRIGHTENED BY MACHINES?" 


2590 

2600 


DATA 

DATA 


2620 

2630 

2640 

2650 

2660 

2670 

2680 

2690 

270O 

2710 

2720 

2730 

2740 

2750 

2760 

2770 

2780 


"WHY DO YOU HAVE PROBLEMS WITH MON 


"DO YOU THINK MONEY IS EVERY THING 


2790 

2800 

2810 


DATA "WHY DO YOU MENTION COMPUTERS?" 
DATA "WHAT DO YOU THINK MACHINES HAVE T 
O DO WITH YOUR PROBLEM?" 

DATA "DONT YOU THINK COMPUTERS CAN HEL 
P PEOPLE?" 

DATA "WHAT IS IT ABOUT MACHINES THAT WO 
RRIES YOU?" 

DATA "I THINK WE WANT TO TALK ABOUT YOU 
NOT ABOUT ME!" 

DATA "WHAT'S ABOUT ME?" 

DATA "WHY DO YOU ALWAYS BRING UP MY NAM 
E?" 

DATA 
EY?" 

DATA 
?" 

DATA "I SAY: MONEY IS NOTHINB!" 

DATA "MAN!! LOVE IS ONLY FOR IDIOTS! WH 
Y DO YOU LOVE*?" 

DATA "WHOM DO YOU LOVE?" 

DATA "IF YOU WANT TO SPEAK ABOUT CRAZY 
GERMAN-TEACHERS, NOT WITH ME!!!" 

DATA "YOU SEEM TO BE QUITE AGRESSIVE! A 
REN’T YOU?" 

DATA "WHY DO YOU HATE*?" 

DATA " YOU ARE RIGHT! I AGREE WITH YOU! 

DATA "DO YOU HAVE ANY PSYCHOLOGICAL PRO 
BLEMS?" 

DATA "OH! INDEED?" 

I SEE." 

I'M NOT SURE I UNDERSTAND YOU FUL 


Q 


DATA 
DATA 
LY. " 

2820 DATA "COME, COME ELUCIDATE YOUR THOUGHT 
S. " 

2B30 DATA 
2840 DATA 
1=0 
hl NT 
PRINT 


"CAN YOU ELABORATE THAT?" 
"THAT IS QUITE INTERESTING!" 


C5RIGHT3 I2RIGHT 


£5RIGHT,4SPACE,3 


I5RIGHT3 I2RIGHT 


I5R1GHTJ I2RIGHT 


CCLR3" 

2870 PRINT "******************************** 
********" 

2880 PRINT "CDOWN3" 

2890 PRINT "C7SPACE,RVS0N,5SPACE,3RIGHTJ <2R 
IGHT3 C3RIGHT,4SPACE 3" 

2900 PRINT "fl1SPACE,RVSDN3 
3 C3RIGHT3 " 

2910 PRINT "C11SPACE,RVS0N3 
RIGHT,4SPACE3" 

2920 PR INI "CI 1SPACE,RVSON3 
3 I3RIGHT 3 " 

2930 PRINT "fl1SPACE,RVS0N> 

3 I3RIGHT,4SPACE 3" 

2940 PRINT "C30SPACE>" 

2950 PRINT " (24SPACEI" 

2960 PRINT "I24SPACE3" 

2970 PRINT "C9SPACE,RVS0N,4SPACE,4RIGHT,2SPA 
CE,RIGHT> I3RIGHT,4SPACEJ" 

2980 PRINT " 199PACE,RVSON3 t7RIGHT,2SPACE,RI 
GHT3 C3RIGHT3 C2RIGHT3 " 

2990 PRINT "C9SPACE,RVSON,4SPACE,4RIGHT,4SPA 
CE,3RIGH T 3 (2RIGHT3 " 

300O PRINT "C7SPACE,RVSON3 C7RIGHT3 £RIGHT,2 
SPACE,3RIGHT3 I2RIGHT3 " 

3010 PRINT "C9SPACE,RVSON,4SPACE,4RIGHT3 CRI 
GHT,2SPACE,3RIGHT,4SPACE3" 

3020 PRINT "C3DOWN3" 

3030 PRINT "******************************** 
********" 

3040 Q=Q+1: IF Q=10 THEN 3080 

3050 M=TI+40 

3060 IF TI<M THEN 3060 

3070 GOTO 3040 

3080 PRINT "ICLR3" 

3090 END 

Llsting. Mit »Eliza« können Sie aus Ihrem Computer 
einen Gesprächspartner machen (Schluß) 
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SPIELE-LISTING 


Way of 
Numbers 

Dieses kleine Spiel für den C16 erfordert Ge¬ 
schicklichkeit und übt den einfachen Umgang mit 
Zahlen. Damit ist es genau das Richtige für die 
Jüngsten unter den C16-Besitzern. 

W er schon lange ein Spiel für den C16 gesucht hat, 
welches auch einen gewissen Lerneffekt aufweist, 
der wird in »Way of Numbers« das geeignete Spiel 
gefunden haben. Hierbei geht es vor allem um das einfache 
Rechnen mit Zahlen. Der Spieler muß versuchen, in einem 
Feld von 10 mal 10 Zahlen einen Weg zu finden, der ihm am 
meisten Punkte beschert. 

Nach dem Laden und Starten des Programms mit »RUN« 
erscheint das Titelbild, welches von einer kleinen Melodie 
begleitet wird. Danach kann das erste Spiel beginnen. Man 
wird aufgefordert, den Startpunkt festzulegen. Mit den 
Cursor-Tasten können Sie auf den gewählten Startpunkt vor- 


PLAV mflTT' 

< fl NS WER : <V> 


OR <H> > 



4 3 G 2 G 9 

6 0 7 0 9 5 

4 5 1 3 

6 5 9 7 7 

5 6 5 1 4 



STEP 25 
TOTAL 153 
MAX 0 


rücken und mit der < RETURN >-Taste bestätigen. Am 
besten sucht man sich gleich eine hohe Zahl als Startpunkt 
aus und muß jetzt versuchen, mit insgesamt 25 Zügen mög¬ 
lichst viele hohe Zahlen zu überschreiten, um eine hohe 
Gesamtpunktzahl zu erhalten. Das Programm ist ausschließ¬ 
lich in Basic geschrieben. Um es einzugeben, beachten Sie 
bitte die Eingabehinweise in diesem Heft. Sie können das 
Spiel auf Diskette oder auch auf Kassette speichern und ent¬ 
sprechend wieder laden. (T. Mucha/B. Rau/jk) 


120 : 

130 : REM INITIAL 
140 : 

150 TRAP 1200:DIMSD(30 >:F=110:SQ=2 T <1/12) 

160 COLOR 1 , 1 ,0:COLOR0,8,7:CaLaR4,6,5 
170 FORI=0TO30:SD(1)=1024-111840/F:F=F*SQ: NEXT 
180 POKE65303,105:POKE65302,39 

190 G*=" (ANSWER: T2SPACE >< Y > T2SPACE JOR T2SPACE ><N>> " 
200 F*="PLAY AGAIN ?" 

210 VGL B 

220 MA=0:M1=65535 

230 SCNCLR:GÜSUB 1230 

240 PQKE 65286,PEEK(65286)GR64 

250 SCNCLR 

260 SU=0:KR=0 

270 CHAR1,2,3,"CRVSON,21SPACE>” 

280 FOR J=4 TO 22 STEP 2 
290 FOR 1=2 TO 20 STEP 2 
300 CHAR 1,I,J,STR*<INT(RND(1>*10>> 

310 SOUND2,100+20* J +10*1,2 

320 NEXTI 

V-.0 CHARi.I.J," " 

340 CHAR1,2,J + 1,"CRVSON,21SPACE1" 

350 NE XI .] 

360 CHAR1,2,23,"CRVSON,21SPACE,RVOFF1“ 

3/0 X=0:Y=0:UG=3235 
380 POKEDG, PEEK (DB) -64 
390 POKEDG-1024,127 
400 CHAR 1,25,4,"STEP"»STR*(KR> 

4 10 CHAR1,24,6,"TO TAL"+STR*(SU) 

420 CHAR1,2b,B,"MAX "+STR*(MA> 

430 IFMINC65535THEN CHAR1,25,10,"MIN "+STR*(MI> 
440 CHAR1,8,0,"SELECT STARTPOINT" 

450 FOR I=BTO0SrEP-l:SOUND1,970,4:VOLI:NEXT 
460 FOR 1 = 1 TO 200: NEXT: VOl.B 
470 : 

4B0 REM STARTPOINT 
490 : 

500 BETA*:DF=DB 

510 IF A*=CHR*(13)THEN620 

520 1F A*="CLEFT>"ANDX>0THENDG=DG-2:X=X-1 

530 IF A*="TRIBHTI"ANDX<9THENDG=DG+2:X=X+1 

540 IF A*="CUP}"ANDY>0THENDG=DG-80:Y=Y-1 

550 IF A*="CDOWNJ"ANDY<9THENDG=DG+80:Y=Y+1 

560 IF DG=DF1HEN 480 

5 70 SULJNDt ,800,2 

580 PQKEDF,PEEK(DF)+64 5POKEDG,PEEK(DB)-64 
590 POKEDF-1024,16:POKEDB-1024,127 
600 GUIO 480 
610 : 


620 REM MAIN PROGRAM 
630 : 

640 CHAR1,5,0,"C24SPACE >" 

650 SOUND1,100,20 
660 SU=SU+PEEK(DG)—112 
670 K»,=KR+1 

6B0 CHAR1,25,4,"STEP"+STR*(KR) 

690 CHAR1,24,6,"TOTAL"+STR*(SU) 

700 IF KR=25 CHEN 1010 
710 : 

720 REM KEYBOARD TEST 
730 : 

740 DF=DG:GETA* 

750 IF A*="TLEFT>"ANDX>0THENDG=DG-2:X=X—1 
760 IF A*="CRIGHT5"ANDX<9THENDG=DG+2:X=X+1 
770 IF A*="CUP)"ANDY>0THENDG=DG—B0:Y=Y—1 
780 IF A*=" TDÜWN>"ANDY<9THENDG=DG+B0:Y=Y+1 
790 IF DG=DFTHEN 710 

800 IF PEEK(DG)<127 THEN DG=DF:G0T0710 
810 : 

820 REM WAY DRAW 
830 : 

840 SUUND 1,600,2 

850 IF DG=DF-80 THENPÜKEDF-40,96 

860 IF DG-DF+80 THENPOKEDF+40,96 

870 IF DG=DF+2 THENPOKEDF+1,96 

880 IF DB-DF-2 THENPÜKEDF-1,96 

890 POKE DG,PEEK(DG)-64 

900 POKE DG-1024,127 

910 : 

920 REM NEXT MOVE TEST 
930 : 

940 IF Y>0ANDPEEK(DG-80> M27THEN660 
950 IF Y<9ANDPEEK(DG+80)>127THEN660 
960 IF X<9ANDPEEK(DB+2)>127THEN660 
970 IF X 70ANDPEEK(DG-2)>127THEN660 
980 : 

990 REM 
1000 : 

1010 RESTORE 1040:FOR J=1 T04:READI:SÜUND1,SD(I),2 
0:NE X T 

1020 READI:FORJ=BTO0STEP-1:SOUND1,SD(1),10:VOLJ:NE 

XT:SOUND1,0,0 

1030 FORI = lTO30:NEX T:V0L8 

1040 DATA 14,16,12,0,7 

1050 CHAR1,25,8,"MAX "+STR*(MA> 

1060 IFMI<65535THENCHAR1,25,10,"MIN "+STR*(MI) 

Listing »Way of Numbers«. 

Beachten Sie bitte die Eingabehinweise auf Seite 159. 
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1070 IFMA<SIJTHENMA=SU 
10B0 IFM1>SUTHENM1-SU 
1090 SOUND1,1000,6 

1100 FDRI-1TOLENIF*):CHAR1,I+5,0,MID*<F*,I,1>:SOUN 
Dl,1*10+800,2:NEXT 

1110 FOR1=1TDLEN(6*):CHAR1,1+5,1,MI Di(ßt,1,1):SOUN 
Dl,1*10+750,2:NEXT 
1120 SOUND1,0,5:VOLB 
1130 : 

11 <10 REM NEX1 GAME 
1150 : 

1160 POKE239,0 
1170 GET A* 

1180 IF Ai«"Y"THEN250 

1190 IFA*-''N" T HENP0KE65286, PEEK (652B6) AND 191: SCNCL 
R:GOSUB1230:SCNCLR:END:ELSE1170 

1200 VOLB:FOR 1-900 TO 600 STEP-10:SOUND1,I,3:SOUN 

D2,900-1,3:NEXT 

1210 1F ER< >30 THEN 1510 

1220 RESUME 250 

1230 : 

1240 REM HEADER 
1250 : 

1260 TRAP 1480 

1270 COLOR0,1:C0L0R4,1:P0KE65286,0:PRINT"5CLR,RVSO 
N,WHITE,40SPACE1" 

1280 PRINT“1RVSON,RED,40SPACE)":PRINI:PRINT 
1290 PRINTTAB(12)"CRVSON,YELLOW1H t8RIGHTJR" 

1300 PRINT T AB(12>"<RVSON > H <8R1GHT,3SPACE,RVOFF,LIG 
-BLUE)1986 

1310 PRINTTAB ( 12) " CRVSON , YELLOW >W<5R IBHT , RVOFF >£.1R 
VSON,2RIGHT >H 

1320 PR I NT " CBLUE ) TTTTTTTTTTT IR I GHT , RVSUN, YELLOW > RR 
R A. RR TSTT R. R<SPACE,RIGHT,RVOFF,BLUEITTTtTTTTTTT" 
1330 PR INT TAB (12) " IRVSON,YELLOW}R R CRIGH1 ) R. hhWH < 
RIGHT5R RR" 

1340 PRINT:PRINTTAB(12)"CLIG.GREEN1P R E S E N T S 

1350 PRINT:PRINT"TSR1GHT}GAME PROGRAMMED BY BOHDAN 
R. RAU 

1360 PRINT:PRINT 


1370 PRINT" tLIG.RED,2SPACElf{2SPACE)R .tiR K R12SPA 
CE> = 

1380 PRINT" C2SPACE > .-X*L— . SSW ARA C2SPACE)SiRi 
1390 PRINT"T2SPACE > F f2SPACE J R f rC2SPACEiri3SPACE) 
JAAH" : PRINTTAB (18) ” jtA" 

1400 PRINT TAB (10) "? V? R R RC2SPACE1R R*A R*A R.*J. il 
* 1 " 

1410 F'RINTI AB(10) "-A- = = rAfcL- RftU 2SPACE}BRA A 

i-L" 

1420 PRINTTAB (10) "T T äJtA RT2SPACEJR RAA tAA RAS A 
AA" :P0KE65286,27 

1430 FOR 1 — 1 T02: RESTORE1560: RE ADR: FÜRJ—1 TOI. 

1440 READA,B:SOUND1,SD(A),B:IFB>0THENSOUND2,SD(B) , 
6 

1450 NEXT:NEXT:IRAP1200 

1460 COLOR 1,1,0:COLOR0,B,7:COLOR4,6,5 
1470 RETURN 

1480 IF ERO30THEN1510 
1490 1-2:J-K:RESUME1450 
1500 RETURN 
1510 : 

1520 REM ERROR-ROUTINE 
1530 : 

1540 P0KE65286,27:PRINT"<CLR>"ERRi(ER),EL 
1550 END:REM END WHEN ERROR 
1560 : 

1570 REM DATAS FOR MUSIC 
1580 : 

1590 DATA 64 

1600 DATA 2,21,2,21,9,21,9,21,2,20,2,0,9,21,9,0,2, 
20,2,0,9,21,9,0,2,20,2,0,9,21,9,0 

1610 DATA 2,20,2,0,9,21,9,0,2,19,2,0,9,17,9,0,2,19 
,2,0,9,21,9,0,2,0,2,0,9,0,9,0 

1620 DATA 0,19,0,0,7,19,7,0,0,19,0,0,7,19,7,0,0,19 
,0,0,7,19,7,0,0,19,0,0,7,16,7,0 

1630 DATA2,16,2,0,9,17,9,0,2,0,2,0,9,0,9,0,2,0,2,0 
,9,0,9,0,2,0,2,0,9,0,9,0 


Listing »Way of Numbers» (Schluß) 


S4GR onuna»»» 


Kampf im All 

Kennen Sie den Spielhallenklassiker »Space 
Invaders«? Es gibt wohl kaum einen Computer, 
für den nicht eine Umsetzung geschrieben wor¬ 
den wäre. »Kampf im All« nennt sich die vorlie¬ 
gende Version für den C16 und Plus/4. 

Z uerst einmal müssen Sie Listing 1 mit unserer Eingabe¬ 
hilfe »MSE C16« eintippen. Beachten Sie daher unbe¬ 
dingt unsere Hinweise auf Seite 159! 

Das Spiel wird mit »LOAD "KAMPF IM ALL",8,1« geladen 
(»...,1,1« für Datasettenbesitzer) und mit »SYS 9232« gestar¬ 
tet. Zuerst sehen Sie eine Einleitung und das eigentliche 
Spielfeld vor sich. Gespielt wird mit dem Joystick in Port 2. 


Hintergrund-Story: Die feindlichen Eindringlinge (Invaders) 
versuchen, den unteren Bildschirmrand (Ihre Basis) zu errei¬ 
chen. Ständig werden Sie mit neuen Informationen durch 
einen Kurier versorgt. Dieser flitzt am oberen Bildschirmrand 
vorbei. Schafft er es, den gesamten Bildschirm zu überflie¬ 
gen, werden seine Befehle ausgeführt. 

Seine Befehle reichen über den Einsatz von verheerenden 
Tarn- oder Spurbomben, erheblicher Steigerung der 
Geschwindigkeit, Abwurf eines Bombenteppiches, Auf¬ 
flackern der Invaders zum Zweck, den Gegner wahnsinnig zu 
machen, bis hin zu Wutausbrüchen. Falls Sie dreimal abge¬ 
schossen wurden oder die Invaders am unteren Bildschirm¬ 
rand angekommen sind, haben Sie verloren. Ansonsten ver¬ 
sucht die nächste Invasion, Sie zu besiegen. 

Für jeden abgeschossenen Invader erhalten Sie je nach 
Aussehen 10, 20, 30, 40 oder 50 Punkte. Für einen abge¬ 
schossenen Kurier gibt es zwischen 50 und 400 Punkte 
(zufällig). 

(Michael Werner/tr) 


Name 

1 

kämpf 

im 

al 1 



2000 3300 

2058 

2060 

: 

86 

C0 

ee 

C0 

f c 
C0 

fB 

C0 

fB 

C0 

fc 

C0 

eo 

fe 

e6 

fe 

14 

d4 

20 c 0 

20 cB 

: 

c6 

c6 

c6 
c 6 

ee 

ee 

7c 

7c 

7c 

3B 

ee 

30 

c6 

38 

c6 

38 

lc 

d3 

2000 

: 

f f 

f f 

ff 

n 

ff 

ff 

ff 

ff 

ff 

206B 

: 

c6 

c6 

ee 

f e 

fe 

d6 

c6 

c6 

7c 

20d0 

i 

fe 

fe 

0e 

lc 

38 

70 

f e 

f e 

55 

2000 

: 

10 

3B 

6c 

c6 

f e 

fe 

c6 

c6 

b9 

2070 

: 

c6 

e6 

f 6 

fe 

da 

ce 

c6 

c6 

54 

20d8 

: 

24 

66 

3c 

7e 

db 

7e 

3c 

24 

f 9 

2010 


fB 

cc 

c6 

f c 

fc 

c6 

cc 

f Ö 

eb 

2078 

: 

38 

7c 

ee 

c6 

c6 

ee 

7c 

3B 

c9 

20e0 

: 

66 

24 

3c 

ff 

db 

7e 

3c 

24 

52 

2010 

t 

le 

7c 

f0 

e0 

B0 

f 0 

7c 

le 

90 

7*080 

: 

fc 

fe 

ce 

ce 

fc 

fB 

C0 

c 0 

a5 

20e3 

: 

18 

7e 

db 

7e 

1B 

3c 

18 

24 

12 

2020 


f0 

f 8 

de 

CB 

CB 

de 

fB 

f0 

37 

2088 

: 

7c 

e6 

c6 

c6 

d6 

7e 

3c 

0e 

70 

20f 0 


24 

66 

3c 

ff 

66 

3c 

1B 

24 

47 

2028 

: 

f e 

le 

c 0 

fe 

fe 

C0 

f e 

f e 

a5 

2090 

: 

fc 

fe 

ce 

ce 

fc 

fB 

de 

ce 

41 

20 f 8 

: 

3c 

18 

7e 

db 

7e 

1B 

18 

24 

ad 

2030 

: 

fe 

f e 

c 0 

fe 

fe 

C0 

C0 

C0 

38 

2093 


7c 

f e 

e 0 

7c 

0e 

G»6 

76 

3c 

c5 

2100 

i 

00 

00 

00 

00 

00 

00 

00 

00 

01 

2038 


7e 

f e 

C0 

C0 

de 

ce 

7c 

38 

44 

20 a0 


fe 

f e 

38 

38 

3B 

38 

38 

38 

c9 

2!0B 

: 

38 

38 

38 

3B 

00 

00 

38 

38 

c3 

2040 


c6 

c6 

c6 

f e 

fe 

c6 

c6 

c6 

c9 

20a8 

: 

ee 

ee 

ee 

ee 

ee 

ee 

f e 

7c 

02 

2110 


66 

66 

66 

00 

00 

00 

00 

00 

43 

2048 

: 

7c 

7c 

38 

38 

38 

38 

7c 

7c 

48 

?0b0 

: 

c6 

c6 

c6 

c 6 

c6 

ee 

7c 

38 

aa 

2118 


18 

18 

3c 

7e 

18 

18 

3c 

3c 

c7 

2050 

: 

1 e 

0 c 

0C 

0 c 

0c 

de 

f 8 

70 

65 

20bB 

: 

c6 

c6 

d6 

fe 

f e 

ee 

c6 

c6 

87 

2120 

: 

18 

18 

3c 

66 

5a 

18 

3c 

3c 

f0 
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2128 


c3 

66 

3c 

7e 

db 

7e 

3c 

66 

6d 

2438 


00 

Be 

f 2 

2f 

ad 

11 

ff 

09 

97 

2748 


eb 

a9 

08 

Bd 

3b 

27 

4c 

Be 

f 6 

21 30 


c3 

e7 

3c 

ff 

db 

7e 

3c 

e7 

68 

2440 


c3 

Bd 

11 

ff 

a9 

03 

Bd 

10 

17 

2750 


ce 

ad 

de 

00 

c9 

01 

dB 

5b 

4b 

2138 


c3 

ff 

5a 

7e 

18 

3c 

66 

c3 

e6 

2448 


+ f 

a0 

00 

a2 

09 

18 

20 

f0 

9f 

2758 


a 0 

00 

a9 

20 

91 

de 

a5 

de 

b7 

2140 


c3 

66 

3c 

ff 

66 

3c 

66 

c3 

af 

2450 


+ + 

a2 

00 

a9 

ff 

Bd 

4e 

03 

81 

2760 


30 

e9 

28 

85 

de 

a5 

dd 

e9 

Be 

2148 


c3 

5a 

7e 

db 

7e 

18 

3c 

e7 

bd 

245B 


bd 

04 

26 

20 

d2 

ff 

aV 

20 

b9 

2768 


00 

85 

dd 

a5 

dd 

c9 

0b 

dB 

51 

2150 


18 

3c 

7e 

18 

99 

db 

ff 

7e 

9e 

2460 


9d 

48 

0f 

e8 

e0 

27 

f0 

7b 

04 

2770 


06 

a9 

00 

8d 

de 

00 

60 

*B 

ad 

2158 


18 

3c 

7e 

IB 

99 

db 

ff 

66 

76 

2468 


a9 

2a 

9d 

48 

0f 

a0 

96 

0c 

00 

2778 


00 

bl 

de 

c9 

4e 

f0 

0B 

c9 

el 

2160 


aa 

00 

06) 

00 

00 

00 

00 

00 

61 

2470 


+ 2 

2+ 

a 0 

fe 

20 

e9 

2f 

e 0 

d2 

2780 


4f 

f0 

04 

c9 
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C16, Plus/4 


TIPS &TRICKS 


Gelöschte Dateien 
einfach wiedeiherstellen 


Hat man versehentlich eine Datei auf Diskette mit 
SCRATCH gelöscht, hilft dieses Programm, die 
verlorene Datei wieder zu retten. 

E s kommt gelegentlich vor, daß man Dateien auf Diskette 
löscht (SCRATCH), um Platz für andere Daten zu erhal¬ 
ten. Im nachhinein stellt man plötzlich fest, daß die 
falsche Datei gelöscht wurde. Ohne Hilfsmittel ist das verlo¬ 
rene File nicht wieder zurückzubekommen, da hierzu die Dis¬ 
kette manipuliert werden muß. Abhilfe schafft dieses Pro¬ 
gramm. Es stellt mit SCRATCH gelöschte Dateien wieder her. 

Das »Unscratch«-Programm (Listing) für den C16 und die 
Diskettenlaufwerke 1541/1551 ist in Basic geschrieben. 
Tippen Sie das Programm bitte ab und speichern es anschlie¬ 
ßend auf eine Diskette oder Kassette. Der Start des Pro¬ 
gramms erfolgt mit RUN. Danach befindet man sich im Menü. 
Dort lassen sich die einzelnen Funktionen mit den Tasten 
< + > und <-> anwählen. <RETURN> startet die Funk¬ 
tion. 

Im unteren Bildschirmbereich werden die Gerätenummer 
(Adresse 8 oder 9), die Drive-Nummer (0 oder 1), die Floppy- 
Station (1541 oder 1551), eine Fehlernummer und der freie 
Speicherplatz des Hauptspeichers angezeigt. Dabei haben 
die Fehlernummern folgende Bedeutung: 

-1 : kein Fehler 
0 : Falsche Geräteadresse 
1 : Falsche Drive-Nummer 
2 : Falsches Laufwerk 
3 : Falscher Tastendruck 
4 : Unterbrechung 

Sollte man das Programm verlassen wollen, genügt ein 
Druck auf <ESC>. 

Nun zu den einzelnen Unterpunkten: 

1. Change Unit Nr. 


Mit diesem Menüpunkt läßt sich die Geräteadresse der 
angeschlossenen Diskettenstation bestimmen (8 bis 15). 
Dabei sind aber nur die Adressen von 8 bis 11 sinnvoll, da 
diese Geräteadressen über die Jumper (Kontaktbrücken) in 
der Diskettenstation bestimmt werden können. 

2. Change Drive Nr. 

Besitzer einer Doppelfloppy wählen hiermit zwischen Drive 
0 und Drive 1. 

3. Change Floppy 

Dieser Menüpunkt gestattet die Wahl der benutzten 
Floppy-Station (1541 oder 1551). 

4. Unscratch Files 

Hier fragt Sie das Programm nach dem Namen der wieder¬ 
herzustellenden Datei. Der Name der gelöschten Datei muß 
bei Aufruf dieser Funktion bekannt sein. Diese wird dann 
gesucht und, falls vorhanden, wiederhergestellt. 

5. Format Disk 

Diese Routine des Programms gestattet das Formatieren 
der Diskette. Dabei wird zwischen zwei verschiedenen Mög¬ 
lichkeiten unterschieden: 

a. FormatVI.O: Formatieren und Löschen allerauf der Dis¬ 
kette befindlichen Programme. Dies entspricht dem For¬ 
matieren einer Diskette mit ID. 

b. F-'mat V2.0 : Formatieren der Directory-Spur. Dies ent¬ 
spricht dem Formatieren einer Diskette ohne Angabe 
einer ID. 

6. Directory 

Hiermit läßt sich das Directory der eingelegten Diskette auf 
dem Bildschirm ausgeben. 

Das Programm kann in der vorliegenden Version ohne Ver¬ 
änderung mit einem »REM-Killer« nachbearbeitet werden. Da 
die REM-Zeilen nicht direkt angesprungen und somit (bis auf 
Zwecke der Dokumentation) nicht benötigt werden, können 
sie auch entfallen. Damit wird Speicherplatz und Tipparbeit 
gespart. (Tobias Ferber/dm) 


10 C*=CHR*<27): B=0 

20 FL*="1551": UN*="0B": D*="0": GRAPHIC CLR 

30 FR*=STR*(FRE(X>>: E*=STR*(ERR> 

40 FOR J=2 TO 6: I*<J>="": NEXT J: I*C1J="{R 
VSONJ" 

50 PRINT C*+"N";C*+"0";C*+"C”: T*="000000" 

60 COLOR 0,1: COLOR 1,8: COLOR 4,1: SCNCLR 
70 FOR A=1 TO 40: S*=S*+"-": NEXT A: TRAP 43 
0 

80 PRINT CHR*<14): POKE 1351,128: TI*=T* 

90 POKE PEEK(1536),PEEK(PEEK(1536 >) 

100 GOTO 160 

110 PRINT "{2H0ME,CLR,DOWN,RIGHT,SHF.SPACE,R 
IGHTJ <RIGHT,BHF.SPACE,RIGHTJ {RIGHT,SHF 
. SPACE,RIGHTJ {RIGHT, RVS0NI UX5.CAR.T_CH Jil. 
0{RVOFF,DOWN >" 

130 CHAR ,0,20,SS: CHAR ,2,22, " {RVSONJ.UNIT {R 
VOFF,RIGHT J {RIGHT, RVS0NJJ3RI VE {RVOFF,RIG 


HTJ {RIGHT,RVSONJ£LOPPY{RVOFF,RIGHTJ {RI 
GHT,RVSON J£RROR{RVOFF,RIGHTJ {RIGHT,RVSO 
NJfREE{RVOFFJ",1 

140 CHAR 1,3,24,UNS,0: CHAR 1,11,24,D*,0: CH 
AR 1,18,24,FL*,0: CHAR 1,28,24,E*,0 

150 CHAR 1,33,24,FR*,0: RETURN 

160 GOSUB 110: E*= M -1" 

170 PRINT "{2H0MEJ" 

180 CHAR 1,03,07,I*(1)+"£HANGE{SHF.SPACEJÜNI 
T IHR. {RVOFF J 

190 CHAR 1,03,09, I* (2) +"£HANGE {SHF. SPACEJ.SRI 
VE jSR. {RVOFF J 

200 CHAR 1,03,11,1*(3)+"£HANGE{SHF.SPACEJ£LO 
PPY{RVOFFJ 

210 CHAR 1,03,13,I*(4)+"ÜNSCRATCH{SHF.SPACEJ 
FILES{RVOFFJ 

Listing. »Unscratch« für den C16 und die 
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C16, Plus/4 


220 CHAR 1,03,15,I*(5)+"£DRMAT 31SKtRVOFFJ 
230 CHAR 1,03,17,I*(6)+",fiIRECTORYtRVOFFJ" 

240 CHAR 1,20,11,"USE +/- TO SELECT {SHF.SPAC 
E> " 

250 CHAR 1,20, 13,"ÜSE £££ TO EX-I.T. {SHF.SPACE 
> {SHF.SPACE>" 

260 CHAR 1 ,20, 09, "ÜSE RELT.U.HW. TO START" 

270 POKE 239,0: SET KEY G* 

2B0 IF I $ (1) = 11 {RVSON > " AND G*="+" THEN I*(l) 

I * (2) = " {RVSON J": GOTO 170 
290 IF I*(l>=" tRVSONJ" AND G*="-" THEN I*<1) 
I*(6)="{RVSON}": GOTO 170 
300 IF I*(2)="tRVSONJ" AND G*="+" THEN I*(2> 
I*(3)="tRVSONJ": GOTO 170 
310 IF I*(2)='*tRVSDNJ" AND G*="-" THEN I*(2> 
= "": I* <1)—"tRVSONJ": GOTO 170 
320 IF I*(3)="{RVSON>" AND G*="+" THEN I*(3> 
= "": I * (4) = "{RVSON >": GOTO 170 
330 IF I * (3) = "tRVSON J" AND G*="-" THEN I*(3) 
= "": I*(2)="IRVSON >": GOTO 170 
340 IF I * (4) “ "{RVSON>" AND G*="+" THEN I*(4> 
="": I * (5 > = "{RVSON>": GOTO 170 
350 IF I*(4)="tRVSONJ" AND G*="-" THEN I*(4> 
I*(3)*"tRVSONJ": GOTO 170 
360 IF I*(5)="tRVSONJ" AND G*="+" THEN I*(5) 
="": I*(6)="tRVSONJ": GOTO 170 
370 IF I*(5)="tRVSONJ" AND G*="-" THEN I*(5> 
="": I*(4)="tRVSONJ": GOTO 170 
380 IF I*(6)="tRVSONJ" AND G*="+" THEN I*(6) 
= "": I*(1)="fRVSON J": GOTO 170 
390 IF I«(6)="tRVSONJ" AND G*="-" THEN I*(6) 
="": I*(5)="tRVSONJGOTO 170 
400 IF G*=CHR*(13) THEN GOTO 470 
410 IF G*=CHR*(27> THEN PRINT "t2H0ME,CLR,DO 
WN,RIGHTJBASIC V3.5": PRINT CHR*(B): END 

420 E*="3" 

430 TRAP 430: IF ERR=30 THEN E*=“4": ERR=-1 
440 VOL 8: SOUND 1,600,9: SOUND 1,800,12 
450 FOR W=1 TO 40: NEXT W: SOUND 1,500,9: SO 
UND 1,700,12 
460 GOTO 160 

470 IF I*(l>="tRVSONJ" THEN GOTO 530 

480 IF I*(2)»"tRVSONJ" THEN GOTO 570 

490 IF I*(3)="tRVSONJ" THEN GOTO 610 

500 IF I*(4)="tRVSONJ" THEN GOTO 650 

510 IF I*(5)="tRVSONJ" THEN GOTO 1190 

520 IF I*(6)="tRVSONJ" THEN GOTO 1640 

530 PRINT "t2H0ME,CLRJÜNIT BUMBER" CHR*(13>" 

-t2D0WNJ": PRINT "SED SNIT BUM 

BER: ";UN* 

540 PRINT "tDOWNJBEW SNIT BUMBER"; 

550 POKE 1319,20: POKE 1320,20: POKE 1321,AS 
C(":")i POKE 1322,32: POKE 239,4: INPUT 
UN* 

560 GOTO 160. 

570 PRINT " I2HQME,CLR JSRIVE BUMBER" CHR*(13> 

"-I2D0WNJ": PRINT "OLD SRI VE 

BUMBER: "; D* 

580 PRINT "tDOWNJBEW SRIVE BUMBER"; 

590 POKE 1319,20: POKE 1320,20: POKE 1321,AS 
C (":"): POKE 1322,32: POKE 239,4: INPUT 
D* 

600 GOTO 160 

610 PRINT "t2H0ME,CLRJ£LOPPY ZYPE" CHR*(13)" 

-f2D0WNJ": PRINT "SLD £LOPPY I 

YPE: ";FL* 

620 PRINT "tDOWNJBEW £LOPPY ZYPE"; 

630 POKE 1319,20: POKE 1320,20: POKE 1321,AS 
C(": "): POKE 1322,32: POKE 239,4: INPUT 
FL* 

640 GOTO 160 

650 PRINT "t2CLR,HOMEJSNSCRATCH" CHR*(13) M — 

-{DOWN}": PRINT "SNIT BUMBER : ";U 

N* 


660 PRINT "tDOWNJSRIVE BUMBER: ";D* 

670 PRINT " tDOWNJfLOPPY ZYPE : ",-FL* 

680 IF VAL(UN*)<8 OR VAL(UN*)>15 THEN E*="0" 
690 IF VAL(D*)<0 OR VAL(D*)>1 THEN E*="l" 

700 IF FL*< >"1551" AND FL*<>"1541" THEN E*=" 
2" 

710 D=VAL(D*): U=VAL(UN*): G=0 
720 IF E*< >" —1" THEN GOTO 430 
730 V=16: 0=32: F=256: T=18: S=l: W=0 
740 Z*=CHR*(0): D*=RIGHT*(D*,1) 

750 PRINT "(2D0WN,RIGHTJ {RIGHT,SHF.SPACE,RI 
GHTJSNTER £ILENAMEtSHF.SPACEJTO ÜNSCRATC 
H{SHF.SPACE J OR {SHF.SPACE,RIGHT,SHF.SPAC 
EJ {SHF.SPACEJ {SHF.SPACEJ {SHF.SPACEJ t 
SHF.SPACEJ#{SHF.SPACEJFOR MILD{SHF.SPACE 
J£ARD SEARCHING. " 

760 POKE 1319,20: POKE 1320,20: POKE 1321,AS 
C ( ":"): POKE 1322,32: POKE 239,4: INPUT 
"tDOWNJBAME";N* 

770 N*=LEFT*(N*,V): L=LEN(N*) 

780 IF RIGHT*(N*,l)<>"*" THEN 800 

790 L-L-l: N*=LEFT*(N*,L): W=l: GOTO 820 

800 IF L=V THEN 820 

810 FOR X=L+1 TO V: N*=N*+CHR*(160): NEXT : 
L=V 

820 OPEN 1,U,15,"I"+D*: GOSUB 1130 
830 OPEN 2,U,2,"#": GOSUB 1130 
840 PRINT#1,"U1:";2;D;T;S: GOSUB 1130 
850 PRINT#1,"B-P:";2;0: GET #2,A*,B* 

860 TR=ASC(A*+Z*): SC=ASC(B*+Z*>: H=2 
870 PRINT#1,"B—P:";2;H: GET #2,T* 

8B0 C=ASC(T*+Z*): IF C>0 THEN 920 
890 GET #2,A*,B*: F*="": FOR X=1 TO V 
900 GET #2,T*: F*=F*+T*: NEXT : IF F*="" THE 
N 940 

910 IF L=0 OR N*=LEFT*(F*,L) THEN 980 
920 H-l r Q: IF H<F THEN 870 
930 IF TR>0 THEN T=TR: S=SC: GOTO 840 
940 IF W THEN PRINT "tDOWNJ £ND OF 3IRECT0RY 
": GOTO 1100 

950 PRINT "tDOWN,SHF.SPACEJ£ILE-BAME:{SHF.SP 
ACEJ ";N* 

960 PRINT "tSHF.SPACEJBaitSHF.SPACEJFOUND IN 
{SHF.SPACE JfilRECTORY" 

970 FOR X=1 TO 2000: NEXT : GOTO 1120 
980 A=ASC(A*+Z*): B=ASC(B*+Z*) 

990 PRINT " tDOWN,SHF. SPACEJ£OUND £.ILE:tSHF.S 
PACEJ ";F* 

1000 PRINT "tSHF. SPACEJflTtSHF.SPACEJJRACK";A 
;"tSHF.SPACEJSECTOR";B 

1010 PRINT "tDOWN,SHF.SPACEJBANTtSHF.SPACEJT 
O tSHF.SPACE J£EVIVE tSHF.SPACE JTHIS £ILE 
(Y/N) 

1020 INPUT X*: IF X*="Y" THEN 1040 
1030 IF W THEN 920 

1040 PRINT "tDOWNJ 1=SEQ {RIGHTJ2=PRGtSHF.SP 
ACE,RIGHT J3=USRtSHF.SPACE,RIGHT J 4=REL“ 
1050 PRINT "tSHF.SPACEJ£NTERtSHF.SPACEJ£ILE- 
JYPE (1-4) ?"; 

1060 INPUT P: IF P<1 OR P>4 THEN PRINT "{2UP 
J": GOTO 1030 

1070 PRINT#1,"B-P:";2;H: PRINT#2,CHR*(P+128) 
I 

1080 PRINT#1,"U2:";2;D;T;S: GOSUB 1130: G=1 
1090 PRINT "tDOWNJ ÜB-SCRATCHED £1LE: tSHF.SP 
ACE,RIGHTJ";F*: IF W THEN 920 
1100 PRINT "tDOWNJ BEVIVE MORE £ILES (Y/N) ? 

1110 INPUT X*: IF X*<>"Y" THEN 1150 
1120 CLOSE 2: CLOSE 1: GOTO 650 
1130 INPUT#1,E,M*,J,K: IF E=0 THEN RETURN 
1140 PRINT "tDOWNJ £RROR: ";E;M*;J;K: FOR WA 
1=1 TO 1000: NEXT WA: BOEMMEL SOFTWARE 
1150 CLOSE 2: CLOSE 1: IF G=0 THEN 160 
1160 PRINT "tDOWNJ B£“SJILDING VALID BAM" 


_J 
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C16, Plus/4 


TIPS &TRICKS 


1170 PRINT " ON JJISK-ÜNIT“;U; " aRIVE";D 
1180 OPEN 1,U,15,"V"+D*: CLOSE 1: GOTO 160 
1190 PRINT "<2HOME,CLRJflDRMAT 31SK" CHR*(13) 


1200 PRINT "(D0MNT30 YOU WANT TO £ORMAT A) J£ 
ERSION 31.0" 

1210 PRINT TAB(22)"<DOWN>B) VERSION ^2.0 
1220 PRINT "{DOWNJJiELECT A/B!": GET KEY A* 
1230 IF A*-"B" THEN GOTO 1330 
1240 POKE 1319,20: POKE 1320,20: POKE 1321,A 
SCPOKE 1322,32: POKE 239,4 
1250 INPUT "{DOWNJJNPUT ÜEADER-äAME";H* 

1260 POKE 1319,20: POKE 1320,20: POKE 1321,A 
SCPOKE 1322,32: POKE 239,4 
1270 INPUT "CDOWNJJNPUT i2";I* 

1280 PRINT "<D0WN>£RES5 ANY .ÜEY TO START": G 
ET KEY A* 

1290 OPEN l,8,15,"N:"+H*+","+I*: CLOSE 1 

1300 INPUT ”CDOWN>£DRMAT ANOTHER fiISK";X* 

1310 IF X*="Y" THEN GOTO 1190 

1320 GOTO 160 

1330 U=VAL(UN* >: D=VAL(D*) 

1340 A=1: V=16: Q*=CHR*(34): P*=CHR*(160> 
1350 T=1B: S=0: I*="I"+RIGHT*(STR*(D),1> 

1360 OPEN 1,U,15,I*: GOSUB 1600 
1370 GOSUB 1560: F*=H*: GET #2,X*,X*,A*,B* 
13B0 PRINT " {DOWN} CURRENT ÜEADER-äAME ";Q*; 
F*;Q* 

1390 PRINT " DISKETTE Ifi IS: {2SPACEJ";A*;B* 
1400 PRINT "{DOWNJ NEW ÜAME (MAX 16 SHARACTE 
RS) DR QUIT-" 

1410 INPUT " 7 OUIT";N*: L=LEN(N*>: IF L>V T 
HEN 1380 

1420 IF N*="QUIT“ THEN GOTO 1620 
1430 PRINT "{DOWNJ OK TO HRITE NEW ÜEADER-ÜA 
ME (Y/N) ?"; 

1440 INPUT X*: IF X*<>"Y" THEN 1380 


1450 IF L=V THEN 1470 

1460 FOR X=L+A TO V: N*=N*+P*: NEXT 

1470 PRINT#1,"B-P:";2;144: PRINT#2,N*; 

1480 PRINT#1,"U2:";2;D;T;S: GOSUB 1600 
1490 PRINT#1,I*: GOSUB 1600: CLOSE 2 
1500 PRINT " {DOWN} OLD ÜEADER-äAME ";Q*;F*;0 
* 

1510 GOSUB 1560: CLOSE 2: CLOSE 1 
1520 PRINT " {DOWN! NEW ÜEADER-äAME ";0*;H*,-Q 
* 

1530 PRINT "CDOWNJ SHANGE ANOTHER DISKETTE ( 
Y/N) 7 "; 

1540 INPUT X*: IF X*="Y" THEN 1340 

1550 PRINT "<CLR>";: GOTO 160 

1560 OPEN 2,U,2,"#": GOSUB 1600: H*="" 

1570 PRINT#1,"Ul:2;D;T;S: GOSUB 1600 
1580 PRINT#1,"B-P:";2;144: FOR X=A TO V 
1590 BET #2,T*: H*=H*+T*: NEXT : RETURN 
1600 INPUT#1,E,M*,J,K: IF E=0 THEN RETURN 
1610 PRINT "CDOWNJ ERROR: ";E;M*;J;K 
1620 CLOSE 2: CLOSE 1: FOR X=1 TO 1000: NEXT 
X: BOEMMEL SOFTWARE 
1630 GOTO 160 

1640 PRINT "C2H0ME,CLRJfilRECTORY" CHR*(13>"- 

-" CHR*(13);C*"T": D=VAL(D*) 

1650 PRINT "C2D0WN,7RIGHTJiNSERT SISK INTO £ 
RIVE 0" 

1660 GET KEY A*: SCNCLR : : PRINT "C2D0WNJ": 
DIRECTORY 

1670 PRINT : PRINT : PRINT "ÜNOTHER £ISK? (Y 
/N)?";: INPUT 0* 

1680 IF 0*="Y" THEN GOTO 1640 
1690 GOTO 160 


Listinq. »Unscratch« für den C16 und die 
Diskc.:anstationen 1541/1551 


Primzahlen automatisch erstellt 


Das Berechnen von Primzahlen per Hand ist eine 
aufwendige Arbeit. Lassen Sie doch Ihren Com¬ 
puter diese Arbeit für Sie erledigen. 

U nter Primzahlen versteht man alle Zahlen, die sich durch 
keine andere ganze Zahl als sich selbst teilen lassen. 
Möchte man eine Reihe von Primzahlen aufstellen, 
benötigt man per Hand geraume Zeit. Werden sogar noch 
große Reihen gewünscht, ist ohne Taschenrechner oder 
Computer nicht mehr viel zu machen. Und in umfangreichen 
Tabeilenwerken nach den gewünschten Daten zu suchen, ist 
wohl auch nicht jedermanns Sache. Doch hier hilft das Pro¬ 
gramm »Primzahlen« (Listing). 

Es nimmt Ihnen die mühevolle Arbeit ab, diese Zahlen zu 
berechnen oder nachzuschlagen. Nach dem Start mit RUN 
möchte das Programm von Ihnen die Startzahl wissen, ab der 
die Primzahlen berechnet werden sollen. Dabei gibt das Pro¬ 
gramm die Zahl »3« vor, da ganze Zahlen unter diesem Wert 
nicht in Frage kommen, da dieee sowieso Primzahlen sind, 
Anschließend startet die Routine die Berechnung und gibt 
zeilenweise alle gefundenen Primzahlen auf dem Bildschirm 
in aufsteigender Reihenfolge aus. 

(B. Mangelsdorff/dm) 


10 REM PRIMZAHLENGENERA TOR =========== 

20 REM =============================== 

30 REM C16/C116/+4 

40 REM =============================== 

50 REM B.MANGELSDORFF 

60 REM =============================== 

70 SCNCLR 

80 PRINT : PRINT : PRINT 

90 PRINT "{3SPACEJPRIMZAHLENGENERAT0R" 

100 PRINT : PRINT : INPUT " {3SPACEJANFANGSZA 
HL”; Z 

110 IF Z=0 THEN Z=1: ELSE Z=Z 
120 IF Z>3 THEN GOTO 140 
130 PRINT " 3" 

140 A-Z: IF A/2-INT(A/2) THEN A-A+l: 

150 A=A+2: B=1 
160 B=B+2 
170 C=A/B 

180 IF C=INT(C) THEN GOTO 150 
190 B2=(Bt2) 

200 IF B2<=A THEN GOTO 160 
210 PRINT INT( A ) 


220 GOTO 150 
230 END 


Listing. Primzahlenberechnung mit dem 
C16/C116 und Plus/4 
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TIPS &TRICKS 


C16 


S1DP-REST0RE- 
Simulation mit Programm- 

analyse 


Der C16 besitzt keine <RESTORE>-Taste, mit 
deren Hilfe Sie auch Maschinenprogramme 
unterbrechen könnten. Dieses kurze Programm 
simuliert die STOP-RESTORE-Funktion und gibt 
Ihnen zusätzlich noch Informationen über Basic- 
Variablen. 

D ie Computer C64 und CI28 besitzen zusätzlich zur 
<STOP>-Taste noch die <RESTORE>-Taste. 

Drücken Sie beide Tasten gleichzeitig, dann wird ein 
sogenannter NMI (nicht maskierbarer Interrupt, wird immer 
ausgeführt) hardwaremäßig ausgelöst, mit dem auch Maschi¬ 
nenprogramme unterbrochen werden können, ohne daß ein 
Basic-Programm verlorengeht. Da die Prozessoren im C16 
und Plus/4 nicht über eine entsprechende Hardware-Leitung 
verfügen, muß man sich anders behelfen. 

Eine sehr geschickte Lösung für dieses Problem finden Sie 
in unserer 64’er-Ausgabe 2/86 unter »Fragen und Antworten 
zum C16«. Die Variante, die wir Ihnen hier vorstellen, hat 
einen anderen interessanten Aspekt. Wenn Sie Basic- 
Programme unterbrechen, erhalten Sie gleichzeitig einen 
Überblick, wieviel Speicherplatz durch das Programm oder 
die verschiedenen Variablen belegt wurde. 
Eingabehinweise 

Um dies zu erreichen, tippen Sie bitte das Listing 1 ab und 
speichern es. Mit RUN können Sie das Programm starten. 
Nach kurzer Zeit erscheint auf dem Bildschirm die Belegung 
der Funktionstasten. Folgende Funktionen sind nun aktiviert: 


Nach dem Drücken der Tastenkombination <CTRL+ 
CLEAR > werden Basic- und Maschinenprogramme unter¬ 
brochen. Basic-Programme können Sie anschließend wieder 
mit RUN starten. 

Nach der Programmunterbrechung sind die Bildschirmfar¬ 
ben neu gesetzt (Hintergrund und Rahmen schwarz, Schrift 
weiß). Alle TED-Register werden neu initialisiert. Abschlie¬ 
ßend erhalten Sie über einen integrierten DUMP-Befehl eine 
genaue Auskunft über die derzeitige Speicherbelegung. 

Dabei werden vom Programm die folgenden Angaben 
gemacht: 

- Anzahl der vom Programm belegten Bytes 

- numerische Variable 

- Feldvariable 

- Text-(String-)variable 

- Anzahl der freien Bytes 

- Bildschirmfarben zurücksetzen 

- TED-Register zurücksetzen 

Interessant ist dies besonders für Programmierer, die mit 
dem Speicherplatz knausern müssen. Dies funktioniert auf 
dem Plus/4 ebenso wie beim C16 und C116 mit Speicher¬ 
erweiterung. 

Eines müssen Sie jedoch beachten: Das Programm ändert 
den IRQ-Vektor. Beim gleichzeitigen Betrieb von Program¬ 
men, die ebenfalls den IRQ-Vektor benutzen, wird es Pro¬ 
bleme geben. Ansonsten ist der STOP-RESTORE-Simulator 
eine nützliche Hilfe bei der Entwicklung von Programmen. 

(Tadeusz Mucha/kn) 


100 DATA EA,A2,00,BD,17,06,20,02,58 
110 DATA FF,E8,C9,00,D0,F5,4C,1E,DF 
120 DATA 06,1B,43,1B,4C,13,13,00,F1 
130 DATA A2,00,BD,2E,06,9D,00,FF,2F 
140 DATA EB,E0,1A,D0,F5,4C,48,06,41 
150 DATA CI,17,44,59,3D,59,1B,08,2E 
160 DATA FF,7D,A2,Al,FF,FF,00,00,BD 
170 DATA 7C,00,C4,Dl,0F,80,DB,F5,70 
180 DATA F7,80,20,4F,FF,93,0D,42,C7 
190 DATA 41,53,49,43,3A,0D,0D,20,94 
200 DATA 50,52,47,20,00,A5,2D,38,13 
210 DATA E5,2B,AA,A5,2E,ES,2C,20,BE 
220 DATA 5F,A4,20,4F,FF,0D,20,56,F4 
230 DATA 41,52,20,00,A5,2F,38,E5,A4 
240 DATA 2D,AA,A5,30,38,E5,2E,20,17 
250 DATA 5F,A4,20,4F,FF,0D,20,41,DF 
260 DATA 52,52,20,00,A5,31,38,ES,B7 
270 DATA 2F,AA,A5,32,E5,30,20,5F,44 
280 DATA A4,20,4F,FF,0D,20,53,54,E6 
290 DATA 52,20,00,A5,37,38,E5,33,9E 
300 DATA AA,A5,38,E5,34,20,5F,A4,C3 
310 DATA 20,4F,FF,0D,20,46,52,45,78 
320 DATA 20,00,A5,33,38,E5,31,AA,F0 


330 DATA A5,34,E5,32,20,5F,A4,4C,5F 
340 DATA 0D,80,A5,C6,C9,39,F0,03,ED 
350 DATA 4C,OE,CE,AD,43,05,29,04,4A 
360 DATA F0,F6,A9,71,BD,3B,05,A2,6F 
370 DATA 00,A9,06,9D,00,01,E8,D0,05 
380 DATA FA,A9,40,85,C6,4C,0E,CE,56 
390 DATA 78,A9,CB,8D,14,03,A9,06,3C 
400 DATA 8D,15,03,58,60,00,00,00,5D 
410 TRAP 470 

420 FOR 1=1542 TO 1789 STEP 8: S=0 
430 FOR j=0 TO 7s READ A*s A=DEC(A*): POKE I 
+J,A: S=S+A: NEXT : READ A*s IF(S AND 25 
5)<>DEC(A*> THEN 460 

440 NEXT Is KEY 4, "SYS1774"+CHR* (13) SYS 17 
'74; KEY 1,"SYS1543"+CHR*<13): KEY 
450 PRINT “CDOWNJDUMP = Fl": PRINT "IRQ SET 
= F4": NEW 

460 PRINT "CHECKSUM ERROR IN LINE" PEEK<63>+ 
256*PEEK(64): END 

470 PRINT "INCORRECT CHARACTER “A$" IN LINE" 
PEEK(63)+256*PEEK(64) 

Listing 1. Listing zur STOP-RESTORE-Simulation 
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TIPS &TRICKS 


Utilities für die Datasette 


Für Anwender, die mit einer Datasette arbeiten, 
sind die beiden Tools »Tape-Format« und »Tape¬ 
test« eine große Hilfe. 

W ill man ein Programm vom C64 auf den C16 übertra¬ 
gen, so geht dies normalerweise nur über den Um¬ 
weg mit einer Diskettenstation. 

Besitzt man aber nur eine Floppy, fängt die umständliche 
Kabel-Umsteckerei an. Abhilfe schafft das Utility »Tape- 
Format« (Listing 1). Damit kann der C 64-Besitzer Programme 
so auf die Kassette speichern, daß ein C16-Besitzer sie ohne 
Probleme laden kann. Die Wirkungsweise ist folgende: 

Nachdem das gesamte ROM ins RAM kopiert wurde, 
ändert das Programm unter anderem vier Speicherstellen, 
die die Baudrate beim Schreiben angeben. Schon kann der 
C 64-Besitzer seine Programme im C16-Förmat auf Kassette 
speichern. Leider ist es mit diesem Hilfsprogramm nicht mög¬ 
lich, vom C64 aus Programme im C16-Format zu laden. 

Das Programm, das mit dem MSE auf dem C64 einzuge¬ 
ben ist, läßt sich mit RUN starten. Anschließend führt der 
C64 einen Reset aus. 

Ein Blick in die Speicherstelle 1 verrät, daß das so verän¬ 
derte Betriebssystem aktiv ist (PEEK(1) = 53). 

Ein Beispiel: wir speichern das Programm »TEST«, welches 
auf der Diskette steht, auf eine Kassette im CI6-Format: 
LOAD "TEST", 8 
SAVE"TEST" 

Schon ist das Programm im richtigen Format auf der Kas¬ 
sette. Wenn wir die Kassette nun entnehmen und in die Data- 


Name : tape-format 0801 08d9 


0801 

: 22 

08 

00 

00 

9e 

20 

32 

30 

3c 

0809 : 

38 

34 

20 

3a 

20 

8f 

20 

22 

ee 

0811 

: 54 

41 

50 

45 

20 

46 

4f 

52 

d9 

0819 

4d 

41 

54 

20 

43 

31 

36 

22 

fb 

0821 

: 00 

00 

00 

78 

a9 

00 

85 

fb 

d9 

0829 . 

a9 

aO 

85 

fc 

aO 

00 

bl 

fb 

ec 

0831 

: 91 

fb 

c8 

dO 

f 9 

e6 

fc 

a5 

22 

0839 

: fc 

c9 

cO 

dO 

fl 

a9 

aO 

85 

5f 

0841 

: fc 

bl 

fb 

91 

fb 

c8 

dO 

f 9 

84 

0849 . 

: ©6 

fc 

a5 

fc 

c9 

00 

dO 

fl 

7a 

0851 

: a9 

e5 

8d 

d6 

fd 

a9 

Ob 

8d 

9f 

0859 ; 

35 

©5 

a9 

00 

8d 

d9 

ec 

8d 

62 

0861 

: da 

ec 

a9 

be 

85 

fb 

a9 

08 

e2 

0869 : 

85 

fc 

a9 

67 

85 

fd 

a9 

fd 

ae 

0871 

: 85 

f e 

aO 

00 

bl 

fb 

91 

fd 

db 

0879 : 

: c8 

cü 

Ob 

dO 

f 7 

a9 

ea 

91 

la 

0881 

: fd 

c8 

cO 

25 

dO 

f 9 

aO 

00 

16 

0889 ; 

b9 

c9 

08 

99 

72 

fd 

c8 

cO 

18 

0891 

: 10 

dO 

f 5 

a9 

a8 

8d 

6b 

fc 

5a 

0899 : 

a9 

00 

8d 

d2 

fb 

a9 

03 

8d 

34 

08al 

: d4 

fb 

a9 

72 

8d 

fl 

fb 

a9 

d7 

08a9 : 

fd 

8d 

f 2 

fb 

a9 

7b 

8d 

e8 

27 

08bl 

: fb 

a9 

fd 

8d 

e9 

fb 

a9 

35 

41 

08b9 : 

: 85 

01 

4c 

o2 

fc 

a2 

00 

86 

20 

08cl 

: Cl 

aO 

aO 

84 

c2 

4c 

8c 

fd 

48 

08c9 : 

a5 

bd 

4a 

a9 

90 

a2 

00 

90 

54 

08dl 

: 04 

a9 

7a 

a2 

01 

4c 

bl 

fb 

ce 


Listing 1. Mit diesem Programm lassen 
sich Dateien vom C64 
auf eine Kassette im C16-Format speichern 


sette eines C16 einlegen, können wir das Programm mit 
LOAD in den C16 laden. 

Nach POKE 1,55 speichert der C64 wieder normal. 

Das nächste Programm »Tape-Test« (Listing 2) dient zum 
Abhören und zur optischen Darstellung des Inhalts einer Kas¬ 
sette. 

Nachdem Sie das Programm mit dem MSE C16 eingege¬ 
ben haben, springen Sie mit dem MONITOR-Befehl in den 
eingebauten TEDMON und verschieben den Bereich mit der 
Befehlsfolge »T 2001 205E 1001«. Das Programm, das jetzt 
im Speicherbereich von $1001 bis $105E steht, kann mit 
»S"TAPETEST C16",1,1001,105E« gespeichert werden. 

Drückt man nach dem Start die PLAY-Taste an der Datasette 
oder dem Recorder, sind auf dem Bildschirm Streifen zu 
erkennen. Diese sind um so dicker, je weiter zwei Impulse auf 
dem Band voneinander entfernt liegen. Außerdem ist die 
Toninformation jetzt hörbar. Das Programm ist dazu gedacht, 
eine Kassette auf eventuellen Inhalt hin zu überprüfen, wenn 
gerade kein Kassettenrecorder zur Hand ist. Außerdem kann 
man mit etwas Übung Rückschlüsse auf das Aufzeichnungs¬ 
format ziehen. (Andreas Jung/dm) 


Name 

tapstest 




2001 205e 

2001 

19 

10 

00 

00 

9e 

20 

34 

31 

41 

2009 

32 

33 

20 

3a 

20 

8f 

20 

54 

cc 

2011 

41 

60 

45 

64 

45 

53 

54 

00 

96 

2019 

00 

00 

78 

a9 

f 7 

25 

01 

85 

24 

2021 

01 

a9 

fe 

8d 

Oe 

ff 

a9 

03 

f 6 

2029 

Od 

12 

ff 

8d 

12 

ff 

a9 

18 

e9 

2031 

8d 

11 

ff 

a9 

ef 

2d 

06 

ff 

fc 

2039 

8d 

06 

ff 

a9 

70 

8d 

19 

ff 

d6 

2041 

a9 

10 

24 

01 

dO 

fc 

24 

01 

a3 

2049 

fO 

fc 

a9 

01 

4d 

19 

ff 

8d 

fb 

2051 

19 

ff 

a9 

10 

4d 

11 

ff 

8d 

4f 

2059 

11 

ff 

4c 

41 

10 

60 

a9 

b5 

bb 


Listing 2. Programm zum optischen Darstellen eines 
Kassetteninhalts (bitte mit dem MSE C16 eingeben) 
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TIPS &TRICKS 


C16 


Sdineller laden 
mit der 
Datasette 

Die Ladezeiten unter Verwendung einer Data¬ 
sette lassen sich verkürzen. »Turbotape C16« 
erhöht die Ladegeschwindigkeit Ihrer Datasette. 

B ei »Turbotape C16« handelt es sich um eine Anpassung 
des Schnelladeprogramms »Turbotape 64« an den C16. 
Damit ist es möglich, Programme schneller von der 
Datasette zu laden. Dabei wird die Übertragungsgeschwin¬ 
digkeit um etwa das Zehnfache gesteigert. Das Programm 
belegt den RAM-Speicher von $3DAA bis $4000. Deshalb 
ist es nötig, Turbotape auszuschalten, wenn mit hochauf¬ 
lösender Grafik gearbeitet wird, beziehungsweise wenn ein 
Programm diesen Speicherplatz anderweitig benutzt. 

Eingabehinweise 


Geben Sie zuerst das Listing mit dem MSE C16 ein. 
Anschließend springen Sie in den eingebauten Monitor und 
geben »T 2001 2235 1001« ein. Der Bereich von $1001 bis 
$12B5 kann nun gespeichert werden. 

Nach dem Laden erfolgt der Start mit RUN. Das Programm 
verschiebt sich automatisch an die richtige Stelle im Spei¬ 
cher, setzt RAMTOP entsprechend herab und führt ein NEW 
aus. Dadurch wird erreicht, daß das Schnellade-Programm 
nicht weiter im verfügbaren Speicherraum steht und mögli¬ 
cherweise von anderen Basic-Programmen überschrieben 
wird. Das NEW dient abschließend dazu, die Programmzei¬ 
ger entsprechend einzurichten. 

Turbotape läßt sich mit 
POKE 776,214 
POKE 777,139 

abschalten. Diese POKEs setzen den Vektor IGONE zurück, 
so daß beim Überschreiben von Turbotape kein Absturz 
erfolgt. 


Die Bedienung von Turbotape 


1. Speichern eines Programms 
:-S"NAME" oder einfach :-S 

2. Laden eines Programms 
L''NAME" oder einfach : — L 

Wenn die Meldung »FOUND NAME« erscheint, ist die 
Commodore-Taste zu drücken. Dadurch teilen Sie dem 
Computer mit, daß das betreffende Programm geladen wer¬ 
den soll (wie die SPACE-Taste im normalen Betriebssystem). 

3. Verify 

V"NAME" oder einfach V 
Das Format von Turbotape C16 ist identisch mit dem For¬ 
mat von Turbotape 64. Es ist also nun möglich, mit dem C16 

ein Programm im Turbotape-Format einzulesen, das mit dem 

C64 gespeichert wurde und umgekehrt. 

Der Doppelpunkt vor den Turbotape-Befehlen ist im Direkt¬ 
modus nötig. 

(Andreas Jung/dm) 


Name : turbotape 16 2001 22b5 


2001 

21 

10 

00 

00 

9e 

20 

34 

31 

49 

2009 

33 

31 

20 

3a 

20 

a2 

20 

3a 

30 

2011 

20 

8f 

20 

54 

55 

52 

42 

4f 

lb 

2019 

54 

41 

50 

45 

20 

31 

36 

00 

2f 

2021 

00 

00 

78 

a9 

5f 

85 

d8 

a9 

4d 

2029 

10 

85 

d9 

a9 

aa 

85 

da 

a9 

3d 

2031 

3d 

85 

db 

aO 

00 

bl 

d8 

91 

50 

2039 

da 

e6 

d8 

dO 

02 

e6 

d9 

©6 

63 

2041 

da 

dO 

02 

e6 

db 

a5 

da 

c9 

ob 

2049 

00 

dO 

ea 

aö 

db 

c9 

40 

dO 

cf 

2051 

©4 

a9 

aa 

85 

37 

a9 

3d 

85 

26 

2059 

38 

20 

aa 

3d 

58 

60 

a9 

b5 

8e 

2061 

8d 

08 

03 

a9 

3d 

8d 

09 

03 

53 

2069 

60 

20 

73 

04 

fO 

04 

c9 

5f 

4c 

2071 

fO 

03 

4c 

d9 

8b 

20 

73 

04 

c 1 

2079 

c9 

53 

fO 

Ob 

c9 

4c 

fO 

10 

6c 

2081 

c9 

56 

fO 

15 

4c 

al 

94 

20 

b8 

2089 

73 

04 

20 

e© 

3d 

4c 

de 

8b 

a5 

2091 

20 

73 

04 

20 

d8 

3e 

4c 

de 

da 

2099 

8b 

20 

73 

04 

20 

db 

3e 

4c 

04 

20al 

de 

8b 

a2 

05 

86 

aO 

20 

6b 

51 

20a9 

a8 

a2 

04 

b5 

2a 

95 

9a 

ca 

a9 

20bl 

dO 

f 9 

20 

19 

e3 

20 

28 

f 2 

6f 

20b9 

20 

77 

3e 

20 

8c 

3e 

a5 

ad 

d5 

20cl 

18 

69 

01 

ca 

20 

ac 

3e 

a2 

cd 

20c9 

17 

b9 

9b 

00 

20 

ac 

3e 

a 2 

49 

20dl 

15 

c8 

cO 

05 

ea 

dO 

f 2 

aO 

5d 

20d9 

00 

a2 

13 

bl 

af 

c4 

ab 

90 

16 

20el 

03 

a9 

20 

ca 

20 

ac 

3e 

a2 

cO 

20e9 

14 

c8 

cO 

bb 

dO 

ed 

a9 

02 

30 

20fl 

85 

aO 

20 

8c 

3e 

98 

20 

ac 

e2 

20f 9 

3e 

84 

a2 

a2 

16 

ea 

bl 

9b 

2d 

2101 

20 

ac 

3e 

a2 

12 

e6 

9b 

dO 

c4 

2109 

04 

e6 

9c 

ca 

ca 

a5 

9b 

c5 

d4 

2111 

9d 

a5 

9c 

©5 

9© 

90 

e7 

ea 

48 

2119 

a5 

a2 

20 

ac 

3e 

a2 

16 

88 

Of 

2121 

d0 

f 6 

aO 

80 

6c 

fc 

07 

18 

al 

2129 

4c 

66 

e5 

aO 

00 

8c 

fc 

07 

9c 

2131 

ad 

06 

ff 

29 

ef 

8d 

06 

ff 

8a 

2139 

ca 

dO 

fd 

88 

dO 

fa 

78 

60 

83 

2141 

aO 

00 

a9 

02 

20 

ac 

3e 

a 2 

32 

2149 

16 

88 

cO 

09 

dO 

f 4 

a 2 

14 

5c 

2151 

c6 

aO 

dO 

ee 

98 

20 

ac 

3e 

33 

2159 

a2 

16 

88 

dO 

f 7 

ca 

ca 

60 

04 

2161 

85 

al 

45 

a2 

85 

a 2 

a9 

08 

81 

2169 

85 

9f 

06 

al 

20 

c7 

3e 

a2 

f 2 

2171 

20 

20 

c7 

3e 

a2 

ld 

c6 

9f 

c8 

2179 

dO 

fO 

60 

ca 

dO 

fd 

90 

05 

7c 

2181 

a2 

15 

ca 

dO 

fd 

a5 

01 

49 

le 

2189 

02 

85 

01 

60 

a2 

00 

2c 

a2 

ba 

2191 

01 

a4 

2b 

a5 

2c 

86 

Oa 

86 

90 

2199 

93 

84 

b4 

85 

b5 

20 

6b 

a8 

a7 

21al 

20 

f 5 

3e 

20 

Oa 

a8 

4c 

03 

6d 

21a9 

87 

20 

57 

3f 

a5 

aO 

c9 

02 

89 

21bl 

fO 

08 

c9 

01 

dO 

f 3 

a5 

ad 

d6 

21b9 

fO 

Oa 

ad 

32 

03 

85 

b4 

ad 

©b 

21 cl 

33 

03 

85 

b5 

20 

c3 

e3 

20 

7e 

21c9 

e8 

e9 

20 

cO 

8c 

a4 

ab 

fO 

44 

21dl 

Ob 

88 

bl 

af 

d9 

37 

03 

dO 

88 

21d9 

dO 

98 

dO 

f 5 

84 

90 

20 

89 

48 

21el 

fl 

ad 

34 

03 

30 

ed 

32 

03 

de 

21e9 

08 

18 

65 

b4 

85 

9d 

ad 

35 

54 

21fl 

03 

65 

b5 

28 

ed 

33 

03 

85 

a9 

21f9 

9e 

20 

6d 

3f 

a5 

al 

45 

a 2 

ac 

2201 

05 

90 

fO 

04 

a9 

ff 

85 

90 

dd 

2209 

4c 

©b 

fO 

20 

a4 

3f 

c9 

00 

f 6 

2211 

fO 

f 9 

85 

aO 

20 

dO 

3f 

99 

2c 

2219 

32 

03 

c8 

cO 

cO 

dO 

f 5 

fO 

63 

2221 

30 

20 

a4 

3f 

20 

dO 

3f 

c4 

81 

2229 

93 

dO 

02 

91 

b4 

dl 

b4 

fO 

66 

2231 

04 

a 2 

01 

86 

90 

45 

a2 

85 

60 

2239 

a 2 

e6 

b4 

dO 

02 

e6 

bö 

a5 

Of 

2241 

b4 

c5 

9d 

a5 

b5 

©5 

9e 

90 

la 

2249 

db 

20 

dO 

3f 

20 

77 

3e 

aO 

48 

2251 

80 

8o 

fc 

07 

18 

4c 

66 

©5 

81 

2259 

20 

lb 

e3 

20 

64 

e3 

20 

8d 

05 

2261 

e3 

aO 

00 

64 

a 2 

20 

©0 

3f 

52 

2269 

26 

al 

a5 

al 

c9 

02 

dO 

f 5 

d9 

2271 

aO 

09 

20 

dO 

3f 

c9 

02 

fO 

©4 

2279 

f 9 

c4 

al 

dO 

e8 

20 

dO 

3f 

a8 

2281 

88 

dO 

f 6 

60 

a9 

08 

85 

9f 

6b 

2289 

20 

eO 

3f 

26 

al 

c6 

9f 

dO 

le 

2291 

f 7 

a5 

al 

60 

a9 

10 

24 

01 

7d 

2299 

fO 

f c 

24 

01 

dO 

fc 

ad 

02 

eO 

22al 

ff 

a2 

6c 

8e 

02 

ff 

a2 

01 

8b 

22a9 

8e 

03 

ff 

a 2 

10 

8e 

09 

ff 

a7 

22bl 

49 

ff 

Oa 

60 

3d 

20 

d2 

ff 

a9 
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C16, Plus/4 


TIPS &TRICKS 


Morsen - 
aufs Gehör 
kommt es an! 

Um Morsetexte entschlüsseln zu können, muß 
man ein Gespür dafür entwickeln, welche Kombi¬ 
nationen welche Zeichen bedeuten. Dieses Pro¬ 
gramm hilft Ihnen dabei. 

D er »Morsetrainer« (Listing) ist ein kleines, in Basic 
geschriebenes Programm. Der Start erfolgt mit RUN. 
Anschließend möchte das Programm einige Werte von 
Ihnen wissen. 

Gute Ergebnisse liefern folgende Werte: 

Lautstärke = 8 
Tonhöhe = 2000 
Punktdauer = 3 

Gibt man nun einen Text ein und drückt < RETURN >, ist 
dieser Text im Morsecode zu hören. Soll der Code noch ein¬ 
mal gespielt werden, ist nur < RETURN > zu drücken. 

Falls der gleiche Text mit anderer Geschwindigkeit oder 
Tonhöhe abgespielt werden soll, gibt man <ir> + 
< RETURN > ein. Daraufhin fragt das Programm die neuen 
Parameter ab. Diese können nach Belieben geändert wer¬ 
den. Wenn man anschließend statt eines neuen Textes nur 
< RETURN > eingibt, wird der alte Text mit veränderten Para¬ 
metern »gemorst«. (Andreas Jung/dm) 


20 DATA'—. . — , — 


30 DATA 


40 DATA- 

“• ■ * ’ “• - ■ 

50 DATA _ 

- -f »“* 

60 DATA-.- 


NEXT I 


70 DATA -.— 

80 DIM MC*<62> 

90 FÜR 1=0 TO 62 s READ MC*(I) 

100 REM INITIALISIERUNG 

110 INPUT "LAUTSTAERKE ";LS 

120 INPUT "TONHOEHE {4SPACE>";FG 

130 INPUT "PUNKTDAUERC2SPACE}";PD 

140 FO=l022 

150 VOL LS 

160 REM TEXTEINGABE 

170 TX*=TP* : INPUT TX* 

180 IF TX*="i" THEN 100 
190 FOR 1=1 TO LENCTX*) 

200 CO=ASCCMID*(TX*,I,l)) AND 127 
210 IF C0<33 DR C0>=96 THEN SOUND 1,F0,4*PD 
: GOTO 280 
220 MC*=MC*(CO-33) 

230 FOR J=1 TO LEN(MC*) 

240 IF MID*(MC*,J,1)=".” THEN SOUND 1,FQ,PD 
: ELSE SOUND 1,FQ,3*PD 
250 SOUND 1,FO,PD 
260 NEXT J 
270 SOUND 1,F0,2*PD 
280 NEXT I 
290 TP*=TX* 

300 GOTO 160 




Listing. Morsen lernen mit dem C16 


Schutz 

vor fremden 

Augen 

Haben Sie eine besondere Routine geschrieben, 
die nicht jedermann sehen sollte oder ist In Ihrem 
Programm ein Paßwort versteckt? Dann schützen 
Sie doch Ihr Programm vor fremden Augen. 

E in Listschutz für Basic-Programme ist eine feine Sache: 
Man kann sein Programm vor den Blicken anderer schüt¬ 
zen. Dies ist von Vorteil, wenn etwa eine besondere Rou¬ 
tine enthalten ist, die man nicht gerne anderen zur Verfügung 
stellen will. 

Um ein Programm unkenntlich, aber trotzdem lauffähig zu 
machen, benötigen Sie den »Listschutz-Maker« (Listing). 
Nach dem Eingeben und Speichern des Programms starten 
Sie es mit RUN. 

Speichern Sie den Listschutz mit 

S"LISTSCHUTZ ", 08,1001,1050 

mm 


Geben Sie nun POKE 43,80 ein und laden das zu schüt¬ 
zende Basic-Programm. Wenn nun POKE 43,1 eingegeben 
wird, ist das Programm geschützt und kann gespeichert wer¬ 
den (DSAVE...). 

Bei den geschützten Programmen muß die erste Zeile 
immer 

POKF. 786,69:POKE 768,246:POKE 769,255 

lauten. Dadurch wird die <STOP>-Taste ausgeschaltet und 
bei Auftreten eines Fehlers ein Reset ausgelöst. Auch wenn 
man mit <STOP/RESET> aussteigt und dann den Monitor 
mit <X> verlassen will, erfolgt ein Reset.(Oliver Dangel/dm) 


10 COLOR 0,1: COLOR 4,7,3 

20 DATA 0, 11, 16, 10, 0,158, 52, 49, 49, 50 
, 0 , 0 , 0 , 0 , 0 , 0,120 
30 DATA 169, 14,141, 20, 3,169,206,141, 21, 
3, 88,169, 80,133, 43,169, 16 
40 DATA 133, 44, 32,136,216,169, 4,133,239,1 
69, 5,141, 39, 5,169, 82,141 
50 DATA 40, 5,169,213,141, 41, 5,169, 13,141 
, 42, 5,169,246,141, 6, 3 
60 DATA 169,255,141, 7, 3,169,113,141, 59, 5 
, 96, 0 

70 FOR L=4096 TO 4175: READ T: POKE L,Ts S=S 
+T: NEXT 

80 IF S06664 THEN PRINT "FEHLER IN DATAS !! 

! " 

90 PRINT ”<CLR,DOWN,YELLOW> >>> LISTSCHUTZ < 

<< 

Listing. Listschutz für Basic-Programme 


SONDERHEFT 14 


157 
















TIPS &TRICKS 


C16, Plus/4 


Spiele-Sounds 
für den C16 und Plus/4 


Wenn Sie schon länger nach passenden Musik¬ 
effekten zum Einbau in Ihre Programme gesucht 
haben, werden Sie hier fündig. 

W as wäre ein gutes Spiel ohne die passenden Sound- 
Effekte? Sei es nun das berstende Geräusch, wenn 
ein feindliches Raumschiff Ihnen soeben den letzten 
Gnadenstoß versetzt hat, oder eine Siegeshymne, die anzeigt, 
daß Sie den hundertsiebenundachtzigsten Level eines 
schweren Spieles erfolgreich gelöst haben. Kurzum: Die Pro¬ 
grammierung von Sound-Effekten sollte jeder angehende 
Spieleautor beherrschen. 

Wer jedoch im Kapitel »Sound« des mitgelieferten 
Commodore-Handbuchs nachschlägt, wird schwer ent¬ 
täuscht: Der C16 beziehungsweise der Plus/4 haben ledig¬ 
lich zwei Tonkanäle, können also maximal nur zwei Töne 
gleichzeitig erklingen lassen. Außerdem kann der Ton nur in 
der Tonhöhe, der Tonlänge und der Lautstärke verändert wer¬ 
den. Die Klangfarbe, die den besonderen Charakter eines 
Sounds ausmacht, ist fest vorgegeben. 

Um besonders gelungene Effekte zu erzeugen, muß man 
sich also einige Tricks einfallen lassen. Der wohl interessan¬ 
teste Effekt besteht darin, zwei Töne mit minimal unterschied¬ 
licher Tonhöhe gleichzeitig ablaufen zu lassen. Das Ergebnis 
ist ein vom Klang her sehr »volumiger« Ton, der auch »Schwe¬ 
bung« genannt wird. 


Auch das Experimentieren mit unterschiedlichen Lautstär¬ 
kewerten oder das stufenlose »Auf- und Abheulen« eines 
Tones kann das Ohr erfreuen. Wenn Sie mehr über die Pro¬ 
grammierung von Sound-Effekten und Musik auf dem C16 
und Plus/4 lernen möchten, lesen Sie bitte im Artikel »Wie 
macht man Musik?« auf Seite 49 in diesem Sonderheft nach. 
Dort erfahren Sie einiges Wissenswertes im Umgang mit dem 
Soundchip und auch ein paar nützliche Programmiertips. 

Fertige Sounds zum Abtippen 


Kommen wir nun zu unserem Listing: Es enthält bereits zehn 
gelungene Geräuscheffekte, die Sie über die Tasten »0« bis 
»9« abrufen können. Diese Sounds sind vor allem dazu 
gedacht, Ihnen einige Anregungen zum Experimentieren mit 
eigenen Effekten zu geben. 

Natürlich können Sie die Effekte auch direkt übernehmen 
und in eigene Basic-Programme einbauen. Dazu müssen Sie 
wissen, wo die Effekte in unserem Listing zu finden sind. Die 
einzelnen Routinen beginnen bei den Zeilen 160, 200, 240, 
280, 320, 370, 430, 470 und 570. Sie enden jeweils mit 
einer Zc-iie, die nur aus einem »GOTO 90« besteht. 

(B. Mangelsdorff/dm) 


10 REM =============================== 

20 REM = SOUNDGENERATOR 

30 REM = FUER C16/116/+4 

40 REM =============================== 

50 REM = B.MANGELSDORFF 

60 REM =============================== 

70 SCNCLR : PRINT : PRINT : PRINT "C3SPACEJS 
PIELEN SIE MIT DEN TASTEN 0-9" 

BO VOL B 
90 GET KEY A$ 

100 B=VAL(A*> 

110 ON B GOTO 160,200,240,280,320,370,430,47 
0,570 

120 FOR 1=1 TO 930 STEP 10 
130 SOUND 1,50+1,1 
140 NEXT I 
150 GOTO 90 

160 FDR 1=230 TO 1 STEP -20 
170 SOUND 1,750+1,1 
180 NEXT I 
190 GOTO 90 

200 FOR 1=200 TO 0 STEP -10 
210 SOUND 3,820+1,1 
220 NEXT I 
230 GOTO 90 

240 FOR 1=1 TO 340 STEP 20 
250 SOUND 3,650+1,1 
260 NEXT I 
270 GOTO 90 

280 FOR 1=1 TO 240 STEP 40 
290 SOUND 1,730+1,2 
300 NEXT I 
310 GOTO 90 

320 FOR 1=430 TO 1 STEP -20 


330 SOUND 1,550+1,2 

340 SOUND 1,540+1,3 

350 NEXT I 

360 GOTO 90 

370 SOUND 3,1015,5 

380 FOR 1=340 TO 1 STEP -20 

390 SOUND 3,650+1,1 

400 NEXT I 

410 SOUND 3,20,5 

420 GOTO 90 

430 FOR 1=0 TO 360 STEP 20 

440 SOUND 3,650+1,INT(1*1/30000) 

450 NEXT I 

460 GOTO 90 

470 SOUND 3,0,3 

480 FOR X=8 TO 1 STEP -1 

490 VOL X 

500 FOR S=3 TO 5 

510 D=S*9+100 

520 SOUND 1,D,3 

530 SOUND 2,D+l,3 

540 NEXT S,X 

550 VOL 0: FOR 1=1 TO 50: NEXT I 

560 GOTO 80 

570 SOUND 1,800,10 

580 SOUND 2,801,10 

590 SOUND 1,900,10 

600 SOUND 2,901,10 

610 SOUND 1,800,10 

620 SOUND 2,801,10 

630 GOTO 90 


Listing. Sound-Effekte für den C16/C116 und Plus/4 
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C16, Plus/4 


EINGABEHILFE 


Eingabehilfe MSE - 
So tippt man Programme ab 


Wenn Sie ein Maschinenprogramm fehlerfrei 
abtippen möchten, ist unser MSE für den C116, 
C16 und Plus/4 eine unentbehrliche Eingabehilfe. 

N obody is perfect. Jeder Computer-Fan, egal ob blutiger 
Anfänger oder ausgefuchster Profi, macht beim Abtip¬ 
pen insbesondere von langen Programmen Fehler. 
Diese dann später zu finden, kann ein langwieriges Unterfan¬ 
gen werden. Damit Sie beim Abtippen aus diesem Sonder¬ 
heft nicht Stunden mit Fehlersuche verbringen müssen, 
haben wir für Sie unseren MSE entwickelt. Er erleichtert das 
Eingeben von Maschinenprogrammen beträchtlich. 

Eingabehinweise 


Als erstes müssen Sie Listing 1, den sogenannten MSE- 
Lader eingeben. Dieser erzeugt dann auf Diskette oder Kas¬ 
sette den eigentlichen MSE. 

Vorgehensweise: 

1. Computer aus- und wieder einschalten, damit er sich in 
einem definierten Ausgangszustand befindet. 

2. Eingabe: »POKE 43,177:POKE 44,22:POKE 5748,0: 
NEW« und < RETURN >-Taste drücken. 

3. Geben Sie das Listing 1, den MSE-Lader, vollständig ein. 
Wenn Sie es nicht auf einmal schaffen, müssen Sie vor jedem 
neuen Laden des MSE-Laders die POKEs aus Punkt 2 einge¬ 
ben! Achten Sie besonders in den Zeilen 50 bis 58 auf even¬ 
tuelle Tippfehler. 

4. Wenn Sie eine Datasette besitzen, müssen Sie in Zeile 
75 anstatt »...,8,...« die Zahl »...,1,...« einsetzen. 

5. Starten Sie den MSE-Lader mit RUN. Sie sehen nun auf 
dem Bildschirm die DATA-Zeile, die gerade bearbeitet wird. 
Wenn der MSE-Lader einen Tippfehler feststellt, bricht er mit 
der Meldung »FEHLER!!!«ab. Überprüfen Sie dann die ange¬ 
zeigte DATA-Zeile noch einmal sorgfältig. 

6. Wenn keine Tippfehler mehr vorliegen, speichert der 
MSE-Lader das fertige Programm unter dem Namen »MSE 
CI 6« automatisch auf Diskette oder Kassette und startet den 
MSE gleich. 

So arbeitet man mit dem MSE 


Wenn Sie die vorhergehenden Schritte genau befolgt haben, 
müßten Sie nun auf Ihrer Diskette oder Kassette das Pro¬ 
gramm »MSE C16« vorliegen haben. Dieses laden Sie nun mit 
»LOAD"MSE C16",8,1« und starten es mit »SYS4106«. 

Der MSE meldet sich nun mit seinem Einschaltbild. Als 
erstes müssen Sie den Namen des Programms eingeben, 
das Sie abtippen möchten. Dieser Name steht-in der Kopf¬ 
zeile jedes MSE-Listings (als MSE-Listing wird ein Programm 
bezeichnet, das Sie mit Hilfe des MSE eintippen können). In 
Bild 1 sehen Sie alle Informationen, die Sie einem MSE- 
Listing entnehmen können. 

Dann geben Sie die Startadresse und die Endadresse ein 
(siehe Bild 1). Der MSE meldet sich nun mit dem Eingabemo¬ 
dus und der ersten Adresse, ab der Sie das Programm einge¬ 


ben werden. In unserem Beispiel aus Bild 1 wäre dies die 
Adresse A000. Sie können nun sofort mit dem Abtippen 
beginnen. Geben Sie nacheinander die Ziffern 8, 0, 7, 6, 
3,... ein. Die Zwischenräume werden vom MSE automatisch 
erzeugt. Wenn Sie alle neun zweistelligen Hexadezimalzah¬ 
len fehlerfrei abgetippt haben, ertönt ein kurzer Ton und die 
Adresse der nächsten Zeile erscheint auf dem Bildschirm. 
Wenn Sie einen Tippfehler gemacht haben, ertönt ein durch¬ 
dringender Warnton und die Zeile wird nicht angenommen. 
Überprüfen Sie nun, an welcher Stelle Sie den Fehler 
gemacht haben. Mit der < DEL>-Taste fahren Sie nun auf das 
fehlerhafte Byte zurück und korrigieren es. Der Warnton 
erklingt so lange, bis die Zeile korrekt angenommen wurde. 
Auf diese Weise tippen Sie nun das jeweilige MSE-Listing 
komplett ab. 

Wenn Sie die letzte Zeile erreicht haben, speichert der 
MSE Ihr Programm automatisch auf Diskette oder Kassette. 
Drücken Sie dazu entweder < D > für Diskette oder <T > für 
Kassette (Tape), wenn die entsprechende Frage in der ober¬ 
sten Bildschirmzeile erscheint. 


1. <CTRL+S> (SAVE) 

Vor allem bei längeren Listings werden Sie wohl kaum »in 
einem Rutsch« mit dem Abtippen durchkommen. Wenn Sie 
nicht mehr weitertippen möchten, drücken Sie die 
<Control>-Taste und dann gleichzeitig <S> (kurz mit 
<CTRL+S> bezeichnet) für den SAVE-Befehl. Entschei¬ 
den Sie sich nun, ob auf Diskette oder Kassette gespeichert 
werden soll. Markieren Sie sich unbedingt im Heft, wie weit 
Sie beim Abtippen gekommen sind! 

Wenn Sie nun später weiter eingeben möchten, geben Sie 
im Anfangsbild des MSE wieder den Programmnamen ein, 
und auf die Frage nach der Startadresse ein »L« für »LOAD«. 
Ihr begonnenes Programm wird daraufhin geladen. 

2. <CTRL+N> (New address) 

Angenommen, Sie möchten nun ein Programm zu Ende 
abtippen und haben es bereits geladen. Als aktuelle Adresse 
meldet der MSE die erste im Programm vorkommende. Wenn 
Sie jetzt <CTRL+N> drücken, können Sie eine neue 
Adresse angeben, ab der Sie weitertippen möchten. 

3. <CTRL+M> (Memory dump) 

Mit dieser Funktion können Sie sich ein Programm anse- 
hen. Geben Sie die Adresse ein, ab der Sie listen möchten. 
Durch Drücken der Leertaste können Sie weiterlisten lassen 
und mit < RUN/STOP > wird das Listen beendet. Wenn die 
letzte Programmzeile erreicht wurde, meldet der MSE »* * * 
Ende * * *«. Mit < RETURN > kommen Sie wieder in den Ein¬ 
gabemodus zurück. 

4. <CTRL + L> (LOAD) 

Hier können Sie das gerade zu bearbeitende Programm 
noch einmal laden. Diese Funktion werden Sie jedoch 
äußerst selten benötigen. 

5. <CTRL+P> (PRINT) 

Damit können Sie das jeweilige Programm ausdrucken las¬ 
sen. Es wird ein Ausdruck wie in Bild 1 erzeugt. Dies sollten 
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C16. Plus/4 


Sie zum Beispiel tun, wenn Sie ein Maschinenprogramm 
geschrieben haben und uns dies zum Veröffentlichen 
schicken möchten. 

Technische Informationen 


Den MSE können Sie am besten mit dem im C16 und Plus/4 
eingebauten Maschinensprachemonitor TEDMON ver¬ 
gleichen. Deshalb sollten Sie sich auch die entsprechenden 
Seiten in der Bedienungsanleitung zu Ihrem Computer 
durchlesen, um das Grundprinzip des MSE genau verstehen 
zu können. 

Jede MSE-Zeile besteht aus acht Programm-Bytes und 
einer Prüfsumme, die durch einen mathematischen Algorith¬ 
mus aus diesen Bytes errechnet wird. Anhand dieser Prüf¬ 
summe erkennt der MSE, ob Sie einen Tippfehler gemacht 
haben. Am Anfang, wenn Sie Programmname, Start- und 
Endadresse eingegeben haben, wird als erstes der benötigte 
Speicherbereich mit $AA-Bytes aufgefüllt. Dies erleichtert 
Ihnen das Auffinden der Adresse, an der Sie mit dem Abtip¬ 
pen aufgehört haben. 

Ein Nachteil des MSE soll an dieser Stelle nicht verschwie¬ 
gen werden: Er stellt zwar eine sehr sichere, aber nicht hun¬ 
dertprozentige Eingabehilfe dar. Das bedeutet, daß sich in 
ganz seltenen Fällen zwei Tippfehler in einer MSE-Zeile 
gegenseitig aufheben können. Die Zeile wird also vom MSE 
angenommen, obwohl sich ein Fehler in ihr befindet. Das Pro¬ 
gramm ist dann natürlich nicht mehr funktionsfähig. Wenn 
also ein Programm gar nicht funktionieren sollte, überprüfen 
Sie mit Hilfe der < CTRL+M > -Funktion das gesamte Listing 
auf Eingabefehler. Dies passiert aber wirklich nur in ganz 
extrem seltenen Fällen. (Otto Schmälzle/tr) 

Basic-Listings 

Wenn Sie ein Basic-Programm abtippen möchten, sollten 
Sie dabei auch einige Dinge beachten: 

1. Steuerzeichen 

Unsere Listings enthalten alle Steuerzeichen im Klartext. 
Diese Texte sind innerhalb von geschweiften Klammern ent¬ 
halten, die Sie auf der Tastatur Ihres Computers vergeblich 
suchen werden. Wenn Sie zum Beispiel »jCLRJ« lesen, müs¬ 
sen Sie beim Abtippen an dieser Stelle die < CLEAR > -Taste 
(die »Bildschirm-Iöschen-Taste« ganz rechts oben auf der 
Tastatur) drücken. Auf dem Bildschirm erscheint dann ein hel¬ 
les (inverses) Herz auf dunklem Hintergrund. Wenn dieses 
Zeichen oder irgendein anderes Steuerzeichen (alle Cursor- 
Steuertasten, alle Farbtasten und alle Grafikzeichen) auf 
einem Drucker ausgegeben werden, sind sie nur sehr schwer 




Programm- 


Start- 

End- 



name 


adresse adresse 

Name : 

programml 


a000 b2 

a5 

a000 : 

80 

76 38 93 

16 

82 38 

aa 

e8 

a008 : 

3b 

20 80 35 

04 

•f 3 34 

81 

CG 

a010 : 

35 

04 f3 34 

80 

80 00 

00 

d7 

b290 : 

f0 

dl ce dl 

02 

fß 03 

4c 

a3 

b298 : 

0e 

b2 ad dB 

02 

30 -f 6 

20 

43 

b2a0 : 

71 

81 c9 2c 

d0 

b2 ad 

dd 

df 

Speicher¬ 

adresse 


je acht Programmbytes 


Prüf- 


pro Zeile 


summen 


Dies müssen Sie eintippen 


zu unterscheiden. Sie müßten dann einige Male herumpro¬ 
bieren, bis Sie die richtige Taste erwischt hätten. 

Diese Steuertasten können natürlich auch kombiniert wer¬ 
den: Wenn Sie zum Beispiel lesen »(CLR,2DOWN,5RIGHT, 
BLUE]«, dann müssen Sie an dieser Stelle im Listing zuerst 
die < CLEAR >-Taste, zweimal »Cursor nach unten«, fünfmal 
»Cursor nach rechts« und dann die Farbtaste »Blau« 
(< Control > -Taste zusammen mit der Zahl 7) betätigen. 

Keine Sorge, wenn Sie sich erst mal daran gewöhnt haben, 
werden Sie diese Erleichterung zu schätzen wissen. Ein Bei¬ 
spiel sehen Sie in Zeile 75 aus Listing 1, mit dem MSE für den 
C16. 

2. Grafikzeichen 

Viele Programm (vor allem Spiele) arbeiten intensiv mit den 
Grafikzeichen des C16 und Plus/4. Diese Zeichen erreichen 
Sie durch Drücken eines beliebigen Buchstabens zusammen 
mit der < SHIFT >- oder der < COMMODORE > -Taste. Auch 
diese Zeichen sind gedruckt nur schwer zu unterscheiden. 
Also haben wir uns wieder etwas einfallen lassen: 

Wenn ein solches Zeichen in einem Listing vorkommt, so 
wird es durch die über- oder unterstrichene tatsächliche Auf¬ 
schrift der jeweiligen Taste ersetzt. Ein Beispiel: Ein überstri- 
chenes »A« bedeutet, daß Sie an dieser Stelle im Listing die 
< Commodore >-Taste zusammen mit dem Buchstaben »A« 
drücken müssen. Auf Ihrem Bildschirm erscheint ein 
90-Grad-Winkel von unten nach rechts, eben ein Grafikzei¬ 
chen. Wenn ein unterstrichenes Zeichen vorkommt, müssen 
Sie dieses zusammen mit der < SHIFT>-Taste eingeben. 

Wenn Sie noch weitere Fragen zum MSE oder zu unseren 
Basic-Listings haben, schreiben Sie uns, oder rufen Sie 
unsere Hotline (Telefon 089/4613-640) an. Wir helfen gerne. 

(tr) 


18 GOTO40 

15- 

20 »>»>>> MSE CI6 <<<<<<<<<<<<<<<<< 

30- 

40 IFPEEK(43)=117ANDPEEK(44)=22THEN49 

42 PRINT"{3RIGHT»TASTE DRUECKEN , UND BITTE N 

OCH" 

44 PRINT"<3D0WN,3RIGHT >EINMAL LADEN !" 

45 BETKEYB*:P0KE43,117:P0KE44,22:P0KE574B,0:N 
EU 

49 S=0:PR INT"ICLR >" 

50 F0RA=4106TO5755:READA* 

52 F'OKEA , DEC (A*) : S=S+DEC (A*) 

54 Z-Z+l:IFZ<10TMENNEXT:Z=-l 

56 CHAR1,10,10,"Z C2SPACE »" : PRINT100+B; 

5B READ P:B=B+10:IFP=STHEN64 

60 PRINT“{FLASHON »FEHLER !!({FLASHOFF»":END 
64 S=0:Z=0:NEXT 

70 F’OKE 1319,19 

71 POKE1320,13:POKE1321,13:POKE1322,13:PÜKE13 
23,13:POKE1324,13:P0KE239,6 

75 PRINT"<CLR»M0NIT0R{7D0WN»S"CHR*<34)"MSE CI 
6"CHR* (34) “ ,8, 100A,1675-C3D0WN}X" 

76 REM !!!DATASETTENBESITZER IN ZEILE 75 ANST 
ATT ",8," EINE ",1,“ EINGEBEN 

80 PRINT"{DOWN»SYS4106" 

90 : 

99 END 

100 DATA 20,DB,12,20,BE,11,A0,13,A9,74, 972 
110 DATA 20,FF,11,A0,13,A9,B9,20,FF,11, 1141 
120 DATA A0,00,20, CF, FF , 99,01,02, C8, C9 , 1211 
130 DATA 0D,D0,F5,88,F0,DC,C0,0F,90,02, 1415 
140 DATA A0,0F,BC,00,02,20,EA,11,A0,13, 779 
150 DATA A9,CF,20,FF,11,20,BE,14,85,DC, 1227 
160 DATA 85,62,20,8E,14,B5,DB,85,61,20, 1039 
170 DATA A7,14, D0,20, A0,13, A9, E5,20, FF, 1291 
180 DATA 11,20,8E,14,85,60,20,8E,14,85, 767 
190 DATA 5F,20,A7,14,D0,0A,A5,61,C5,5F, 1086 
200 DATA A5,62,E5,60,90,06,20,43,13,4C, 932 
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210 

DATA 

3A,10,A9,AA,A0,00,91,DB,E6,DB, 

1386 

1000 

DATA 

20,2D,20,65,44,49,54,4F,52,20, 

628 

220 

DATA 

D0,02,E6,DC,20,3F,12,90,EF,4C, 

1232 

1010 

DATA 

0D,0D,20,20,20,20,20,20,20,20, 

282 

230 

DATA 

FB,14,A2,02,86,58,A9,A6,A0,9D, 

1309 

1020 

DATA 

56,4F,4E,20,6F,2E,73,43,48,4D, 

763 

240 

DATA 

20,F2,11,20,E4,FF, F0,FB,C9,30, 

1546 

1030 

DATA 

41,45,4C,5A,4C,45,20,20,20,20, 

573 

250 

DATA 

90,0C, C9,47, B0,08, C9,3A, 90,0B, 

1026 

1040 

DATA 

20,20,00,0D,0D,0D,20,20,20,70, 

311 

260 

DATA 

C9,41,B0,07,C9,14,D0,0F,4C,0B, 

980 

1050 

DATA 

52,4F,47,52,41,4D,4D,4E,41,4D, 

753 

270 

DATA 

11,20,D2,FF,A6,5B,95,D7,C6,58, 

1418 

1060 

DATA 

45,20,3A, 20,00,0D, 0D, 20,20,20, 

313 

280 

DATA 

D0,D2,60,AE,C6,00,F0,26,C9,0C, 

1377 

1070 

DATA 

73,54,41,52,54,41,44,52,45,53, 

797 

290 

DATA 

D0,03,4C,0B,16,C9,13,D0,03,4C, 

827 

1080 

DATA 

53,45,20,3A, 20,24,00,0D, 0D , 20, 

368 

300 

DATA 

BB,15,C9,0D,D0,03,4C,BA,14,C9, 

1068 

1090 

DATA 

20,20,65,4E,44,41,44,52,45,53, 

678 

310 

DATA 

10, D0,03,4C , 64,16, C9,0E, D0,06 , 

854 

1 100 

DATA 

53,45,20,20,20,3A,20,24,00,00, 

374 

320 

DATA 

20,5F,14,4C,64,11,4C,92,10,A5, 

743 

1110 

DATA 

00,00,00,92,05,6E,41,4D,45,20, 

504 

330 

DATA 

D9,20,02,11,0A,0A,0A,0A,85,D9, 

658 

1120 

DATA 

3A,20,20,00,12,20,20,2A,2A,2A, 

330 

340 

DATA 

A5, D8,20,02,11,05, D9,60, C9,3A, 

1009 

1130 

DATA 

20,66,41,4C,53,43,48,45,20,65, 

699 

350 

DATA 

90,02,69,08,29,0F,60,A6,59,E0, 

890 

1140 

DATA 

49,4E,47,41,42,45,20,2A,2A,2A, 

580 

360 

DATA 

08,90,1F,A6,58,E0,02,60,06,20, 

877 

1150 

DATA 

20,20,92,00,0D, 0D, 2A, 2A, 2A, 20 , 

394 

370 

DATA 

D2,FF,4C,8E,10,C6,59,A0,14,A9, 

1335 

1160 

DATA 

65,4E,44,45,20,2A,2A,2A,00,13, 

493 

380 

DATA 

92,20,F2,11,CA,D0,FA,84,57,68, 

1420 

1170 

DATA 

05,20,20,12,64,92,49,53,48,20, 

596 

390 

DATA 

68,4C,8B,11,A6,CA,E0,08,B0,03, 

1115 

1180 

DATA 

4F,44,45,52,20,12,74,92,41,50, 

755 

400 

DATA 

4C,92,10,20,D2,FF,A6,58,E0,02, 

1215 

1190 

DATA 

45,0D,00,13,20,20,69,2F,6F,20, 

460 

410 

DATA 

90,09,C6,59,20,D2,FF,C6,58,D0, 

1431 

1200 

DATA 

2D,20,66,45,48,4C,45,52,00,20, 

579 

420 

DATA 

F9,4C,8E,10,48,4A,4A,4A,4A,20, 

883 

1210 

DATA 

DB,12,20,48,12, A0,13, A9,CF,20, 

946 

430 

DATA 

59,11,68,29,0F,C9,0A,90,02,69, 

728 

1220 

DATA 

FF,11,20,BE,14,85,DC,20,8E,14, 

1013 

440 

DATA 

06,69,30,4C,D2,FF,A2,FC,9A,20, 

1300 

1230 

DATA 

85, DB, C5,61, A5, DC, E5,62,90,23, 

1537 

450 

DATA 

DB,12,20,48,12,20,EA,11,20,9F, 

833 

1240 

DATA 

A5, DB, C5,5F, A5, DC , E5,60, B0,19, 

1587 

460 

DATA 

12,A5,DC,20,4E,11,A5,DB,20,4E, 

1024 

1250 

DATA 

20, A7,14, D0,14,60,20, A7,14, F0, 

1002 

470 

DATA 

11,20,ED,11,A9,3A,A0,20,20,F2, 

996 

1260 

DATA 

0C,B5,D9,20,A7,14,F0,05,85,D8, 

1175 

480 

DATA 

11,A9,00,85,59,20,8E,10,20,ED, 

867 

1270 

DATA 

4C,EF,10,68,68,20,43,13,4C,5F, 

828 

490 

DATA 

11,A4,59,20,EF,10,91,DB,CB,84, 

1253 

1280 

DATA 

14,20,CF,FF,C9,4C,D0,09,20,DB, 

1259 

500 

DATA 

59,C0,08,90,EC,20,10,12,A9,12, 

922 

1290 

DATA 

12,20,48,12,4C,08,16,C9,0D,60, 

559 

510 

DATA 

20,D2,FF,20,8E,10,20,EF,10,C5, 

1171 

1300 

DATA 

A9,00,85,5E,20,5F,14,20,EA,11, 

826 

520 

DATA 

FF,F0,1B,20,43,13,A9,14,A0,14, 

1009 

1310 

DATA 

20,0D,15,24,5E,30,05,20,E4,FF, 

764 

530 

DATA 

20,F2,11,4C,A2,11,A9,51,8D,15, 

958 

1320 

DATA 

F0 ,FB,20,E1,FF,F0,26,20,9F,12, 

1490 

540 

DATA 

FF , A9,3A, 8D ,19, FF, I3D, 3B, 05,60, 

1204 

1330 

DATA 

24,5E,10,09,20,4E,15,20,0D,15, 

352 

550 

DATA 

A9,92,20,D2,FF,20,33,12,20,08, 

953 

1340 

DATA 

20,60,15,20,33,12,20,3F,12,90, 

507 

560 

DATA 

13,20,3F,12,90,91,4C,8B,15,EA, 

891 

1350 

DATA 

D7,A0,14,A9,28,20,FF,11,20,E4, 

1168 

570 

DATA 

85,61,AD,34,03,85,62,4C,FB,14, 

1036 

1360 

DATA 

FF,C9,0D,D0,F9,A9,00,B5,5E,A5, 

1487 

580 

DATA 

A9,0D,2C,A9,20,4C,D2,FF,20,D2, 

1210 

1370 

DATA 

61,85,DB,A5,62,85,DC,20,08,13, 

1124 

590 

DATA 

FF,98,4C,D2,FF,20,E4,FF,F0,FB, 

1954 

13BP ATA 

4C,64,11,A5,DC,20,4E,11,A5,DB, 

1089 

600 

DATA 

60,84,5D,85,5C,A0,00,Bl,5C,F0, 

1215 

1390 

DATA 

85,FF,20,4E,11,A9,20,A0,3A,20, 

966 

610 

DATA 

06,20,D2,FF,C8,D0,F6,60,A5,DB, 

1637 

1400 

DATA 

F2,11,A0,00,20,ED,11,B1,DB,20, 

1133 

620 

DATA 

85,5A,A0,00,84,5B,Bl,DB,18,65, 

1127 

1410 

DATA 

4E,11,C8,C0,08,90,F3,20,ED,11, 

1168 

630 

DATA 

5A,85,5A,90,02,E6,5B,06,5A,26, 

914 

1420 

DATA 

24,5E, 30,03, A9,12,2C, A9,20,20, 

645 

640 

DATA 

5B,CB,C0,08,90,EC,A5,5A,65,5B, 

1318 

1430 

DATA 

D2,FF,20,10,12,A5,FF,20,4E,11, 

1078 

650 

DATA 

85,FF,60,1B,A5,DB,69,08,85, DB, 

1357 

1440 

DATA 

A9,92,20, D2, FF, 4C, EA , 11 , A9,07, 

1315 

660 

DATA 

90,02,E6,DC,60,A5,DB,C5,5F,A5, 

1533 

1450 

DATA 

85, AC, 85, AD, A9,04,85, AE, 20 , C0, 

1315 

670 

DATA 

DC,E5,60,60,A0,13,A9,FF,20,FF, 

1531 

1460 

DATA 

FF, A2,07,4C, C9 , FF, 20, CC, FF , A9, 

1616 

680 

DATA 

11,A0,01,69,00,02,20,D2,FF,CC, 

1066 

1470 

DATA 

07,4C, C3, FF , 20,5F ,14, A9,80,85, 

1110 

690 

DATA 

00,02,C8,90,F4,A9,10,ED,00,02, 

1014 

1480 

DATA 

5E , 20,4E , 15,20,48, 12, A2,22, A9, 

712 

700 

DATA 

AA,20,tD,11,CA,D0,FA,A5,62,20, 

1411 

1490 

DATA 

2D,20,D2,FF,CA,D0,FA,20,EA,11, 

1485 

710 

DATA 

4E,11,A5,61,20,4E,11,20,ED,11, 

770 

1500 

DATA 

20,EA,11,20,60,15,4C,C1,14,20, 

753 

720 

DATA 

A5,60,20,4E,11,A5,5F,20,4E,11, 

775 

1510 

DATA 

B8,15,A6,5F,A4,60,A9,61,20,D8, 

1240 

730 

DATA 

A9,90,20,D2,FF,20,EA,11,24,5E, 

1223 

1520 

DATA 

FF , B0,0A , 20, B7, FF , 29 , BF, D0,03, 

1354 

740 

DATA 

10,01,60,A9,12,20,D2,FF,A2,28, 

999 

1530 

DATA 

4C,FB,14,A9,01,20,C3,FF,20,F4, 

1275 

750 

DATA 

20,ED,11,CA,D0,FA,A9,92,4C,D2, 

1547 

1540 

DATA 

12,A0,14,A9,4F,20,FF,11,20,F9, 

1031 

760 

DATA 

FF,A5,CD,C9,16,B0,01,60,A9,A0, 

1450 

1550 

DATA 

11,4C,FB,14,20,F4,12,A9,37,A0, 

1042 

770 

DATA 

85,E4,A9,78,85,E6,A9,0C,85,E5, 

1556 

1560 

DATA 

14,20,FF,11,20,F9,11,A2,0B,C9, 

993 

780 

DATA 

B5,E7,A2,13,A0,27,B1,E4,91,E6, 

1524 

1570 

DATA 

44,F0,06,A2,01,C9,54,D0,F1,A9, 

1380 

790 

DATA 

88,10,F9,CA,F0,41,18,A5,E4,69, 

1430 

1580 

DATA 

01,A8,20,BA,FF,A0,00,E0,01,F0, 

1267 

800 

DATA 

28,85,E4,90,02,E6,E5,18,A5,E6, 

1425 

1590 

DATA 

1A,A9,40,8D,20,02,A9,3A,8D,21, 

835 

810 

DATA 

69,28,85,E6,90,E0,E6,E7,4C,B6, 

1595 

1600 

DATA 

02,B9,01,02,99,22,02,CB,CC,00, 

783 

820 

DATA 

12,A9,93,20,D2,FF,A2,00,A9,00, 

1162 

1610 

DATA 

02,90,F4,C8,C8,D0,0C,B9,01,02, 

1198 

830 

DATA 

9D,00,08,9D,00,09,E8,D0,F5,A9, 

1 185 

1620 

DATA 

99,20,02,C8,CC,00,02,D0,F4,98, 

1197 

840 

DATA 

80,8D,F7,07,60,EA,A9,13,20,D2, 

1283 

1630 

DATA 

A2,20,A0,02,4C,BD,FF,20,BQ,15, 

1113 

850 

DATA 

FF,A2,IC,20,ED,11,CA,D0,FA,60, 

1487 

1640 

DATA 

A5,AE,C9,08,90,33,A6,AD,86,57, 

1303 

860 

DATA 

CA,A9,91,4C,D2,FF,A9,1F,8D,11, 

1415 

1650 

DATA 

A9,01,20,C3,FF,A9,60,85,AD,20, 

1255 

870 

DATA 

FF,A9,EC,8D,0E,FF,A0,80,20,1D, 

1419 

1660 

DATA 

C0, FF , B0,28, A5, AE , 20, B4, FF, A5 , 

1634 

880 

DATA 

13,A9,0F,8D,11,FF,60,A2,FF,CA, 

1331 

1670 

DATA 

AD,20,96,FF,20,A5,FF,85,61,A5, 

1457 

890 

DATA 

D0,FD,88,D0,F8,60,A9,1F,8D,11, 

1507 

1680 

DATA 

90,4A,4A,B0,13,20,A5,FF,85,62, 

1170 

900 

DATA 

FF,A9,D5,BD,0E,FF,A0,FF,20,1D, 

1523 

1690 

DATA 

20,AB,FF,A5,57,85,AD,A9,00,20, 

1217 

910 

DATA 

13,A9,7F,8D,11,FF,A9,E3,8D,0F, 

1280 

1700 

DATA 

D5,FF,90,03,4C,A3,15,86,5F,B4, 

1236 

920 

DATA 

FF,60,48,20,53,3B, 20, F0, FF, 8A, 

1259 

1710 

DATA 

60,A5,AE,C9,01,D0,06,AD,33,03, 

1078 

930 

DATA 

48,98,48,18,A0,06,A2,18,20,F0, 

944 

1720 

DATA 

4C,E0,11,4C,FB,14,A9,00,A0,00, 

993 

940 

DATA 

FF,A0,14,A9,0A,20,FF,11,20,26, 

98B 

1730 

DATA 

99,20,02,CB,C0,20,90,F8,4C,68, 

1183 

950 

DATA 

13,20,E4,FF,F0,FB,A2,1D,A9,14, 

1405 

1740 

DATA 

15,00 , FF , 00 , FF , 00 , FF , 00 , FF , 00 , 

1041 

960 

DATA 

20,D2,FF,CA,D0,FA,68,AB,&B,AA, 

1703 

1800 

REM 

- ENDE MSE 16 - 


970 

DATA 

18,4C,F0,FF,0E,0D,0D,20,20,20, 

731 





980 

DATA 

20,20,20,20,6D,41,53,43,48,49, 

597 

Listing 1. Unsere Eingabehilfe »MSE C16«. Beachten Sie bitte 

990 

DATA 

4E,45,4E,53,50,52,41,43,48,45, 

743 

die Eingabehinweise im Text 
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